Mercurial > octave-nkf

diff src/variables.cc @ 5744:1c36a2e82266

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-04-06 19:38:34 by jwe]
author jwe
date Thu, 06 Apr 2006 19:38:35 +0000
parents a527e0f77aa5
children ce79d238f142
line wrap: on
line diff
--- a/src/variables.cc	Thu Apr 06 08:20:23 2006 +0000
+++ b/src/variables.cc	Thu Apr 06 19:38:35 2006 +0000
@@ -1946,7 +1946,7 @@
     }
   else if (args.length () == 0)
     {
-      octave_user_function *fcn = octave_call_stack::caller_script ();
+      octave_user_function *fcn = octave_call_stack::caller_user_function ();
 
       if (fcn)
         mlock (fcn->name ());
@@ -1980,7 +1980,7 @@
     }
   else if (args.length () == 0)
     {
-      octave_user_function *fcn = octave_call_stack::caller_script ();
+      octave_user_function *fcn = octave_call_stack::caller_user_function ();
 
       if (fcn)
         mlock (fcn->name ());
@@ -2015,7 +2015,7 @@
     }
   else if (args.length () == 0)
     {
-      octave_user_function *fcn = octave_call_stack::caller_script ();
+      octave_user_function *fcn = octave_call_stack::caller_user_function ();
 
       if (fcn)
         retval = mislocked (fcn->name ());