/[gnump3d]/gnump3d/lib/gnump3d/lang/lookup.pm
ViewVC logotype

Diff of /gnump3d/lib/gnump3d/lang/lookup.pm

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

revision 1.3 by skx, Tue Oct 14 13:45:30 2003 UTC revision 1.4 by skx, Tue Oct 14 13:52:39 2003 UTC
# Line 80  sub interpolateString( $ ) Line 80  sub interpolateString( $ )
80          no strict 'refs';          no strict 'refs';
81          no warnings;          no warnings;
82    
83          while ( $text =~ s!(.*?)\$([^ .,\n\t\$]+)(.*)!$1.${'main::'.$2}.$3!e )          while ( $text =~ s!(.*?)\$([^ .,\/\n\t\$]+)(.*)!$1.${'main::'.$2}.$3!e )
84          {          {
85              1              1
86          };          };

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

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