Mercurial > hg > octave-nkf

diff scripts/path/pathdef.m @ 10635:d1978e7364ad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Print name of function in error() string messages.
author Rik <octave@nomad.inbox5.com>
date Sun, 16 May 2010 22:26:54 -0700
parents 95c3e38098bf
children 693e22af08ae
line wrap: on
line diff
--- a/scripts/path/pathdef.m
+++ b/scripts/path/pathdef.m
@@ -113,7 +113,7 @@
     unwind_protect_cleanup
       closeread = fclose (fid);
       if (closeread < 0)
-        error ("savepath: could not close savefile after reading, %s",
+        error ("__extractpath__: could not close savefile after reading, %s",
                savefile);
       endif
     end_unwind_protect
@@ -121,7 +121,7 @@
 
   ## Extract the path specifiation.
   if (startline > endline || (startline > 0 && endline == 0))
-    error ("savepath: unable to parse file, %s", savefile);
+    error ("__extractpath__: unable to parse file, %s", savefile);
   elseif (startline > 0)
     ## Undo doubling of single quote characters performed by savepath.
     specifiedpath = strrep (regexprep (cstrcat (filelines(startline:endline){:}),