# HG changeset patch
# User Ben Abbott <bpabbott@mac.com>
# Date 1206994260 14400
# Node ID b785c56df58fe942be024530e4cfacc1b7a939cb
# Parent  1b9fc670dce0aaae09e80e2431e4d086f828037c
run.m: fix check for file existence

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-31  Dmitri A. Sergatskov  <dasergatskov@gmail.com>
+
+	* miscellaneous/run.m: Fix check for existence of file.
+
 2008-03-28  Thomas Weber  <thomas.weber.mail@gmail.com>
 
 	* miscellaneous/tempdir.m: Use correct function name in texinfo
diff --git a/scripts/miscellaneous/run.m b/scripts/miscellaneous/run.m
--- a/scripts/miscellaneous/run.m
+++ b/scripts/miscellaneous/run.m
@@ -40,7 +40,7 @@
       wd = pwd ();
       unwind_protect
 	cd (d);
-	if (! exist (s, "file") ||  ! strcmp (ext, ".m"))
+	if (! exist (f, "file") || ! strcmp (ext, ".m"))
 	  error ("run: file must exist and be a valid Octave script file");
 	endif
 	evalin ("caller", [f, ";"], "rethrow (lasterror ())");