Mercurial > hg > octave-lyh

diff src/ov-fcn-handle.cc @ 4649:f7ce581b27fb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-11-23 21:46:44 by jwe]
author jwe
date Sun, 23 Nov 2003 21:46:44 +0000
parents d44675070f1a
children a9b22513b7a6
line wrap: on
line diff
--- a/src/ov-fcn-handle.cc
+++ b/src/ov-fcn-handle.cc
@@ -54,7 +54,7 @@
 octave_fcn_handle::print_raw (std::ostream& os, bool pr_as_read_syntax) const
 {
   indent (os);
-  os << "@" << name ();
+  os << name ();
 }
 
 octave_value
@@ -97,7 +97,9 @@
 	    {
 	      Octave_map m;
 
-	      m ["function"](0) = fh->name ();
+	      std::string fh_nm = fh->name ();
+
+	      m ["function"](0) = fh_nm.substr (1);
 
 	      if (fcn->is_nested_function ())
 		m ["type"](0) = "subfunction";
@@ -139,7 +141,10 @@
       octave_fcn_handle *fh = args(0).fcn_handle_value ();
 
       if (! error_state && fh)
-	retval = fh->name ();
+	{
+	  std::string fh_nm = fh->name ();
+	  retval = fh_nm.substr (1);
+	}
       else
 	error ("func2str: expecting valid function handle as first argument");
     }