/[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.8 by skx, Sat Nov 1 16:21:42 2003 UTC revision 1.9 by skx, Sun Nov 23 16:42:53 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!(.*?)\$([a-zA-Z-_]+)(.*)!$1.${'main::'.$2}.$3!e )          while ( $text =~ s!(.*?)\$([a-zA-Z-_\!]+)(.*)!$1.${'main::'.$2}.$3!e )
84          {          {
85              1              1
86          };          };

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

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