/[papo]/papo/neb/neb/Tree/Node.pm
ViewVC logotype

Diff of /papo/neb/neb/Tree/Node.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by jlenton, Wed Apr 9 23:52:49 2003 UTC revision 1.5 by jlenton, Thu Apr 10 23:01:39 2003 UTC
# Line 14  Line 14 
14    
15  package neb::Tree::Node;  package neb::Tree::Node;
16  use strict;  use strict;
17    use warnings;
18  use Carp;  use Carp;
19    use neb::Quoter;
20    
21  our $DEBUG;  our $DEBUG;
22    
# Line 44  sub code Line 46  sub code
46  {  {
47      my $self = shift;      my $self = shift;
48    
49      return sprintf ("\$OUTPUT .= \"%s\";\n",      return sprintf ("\$OUTPUT .= %s;\n",
50                      quotemeta $self->canonical);                      quote $self->canonical);
51  }  }
52    
53  1;  1;

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26