Mercurial > forge

changeset 871:8386a80fde66 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix whos handling
author aadler
date Thu, 20 Mar 2003 03:40:26 +0000
parents 2d88043049ca
children 7816fd3de8f9
files extra/perl/Octave.pm
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/extra/perl/Octave.pm	Tue Mar 18 21:50:23 2003 +0000
+++ b/extra/perl/Octave.pm	Thu Mar 20 03:40:26 2003 +0000
@@ -325,7 +325,7 @@
 sub get_defined_functions
 {
    my $o = shift;
-   my $data= $o->interpret("whos -functions");
+   my $data= $o->interpret("whos('-functions')");
    my @funclist;
    while ( $data =~ /user(-defined|) function +- +- +(\w+)/g )
    {
@@ -920,6 +920,9 @@
        into an Inline::Octave::Variable class
 
 $Log$
+Revision 1.18  2003/03/20 03:40:26  aadler
+fix whos handling
+
 Revision 1.17  2003/01/07 02:47:49  aadler
 mods to remove warnings from tests