Changeset 16928
- Timestamp:
- 2008-08-21T11:07:09+12:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/doc.pm
r16924 r16928 941 941 942 942 # get the actual filename as it exists on the filesystem which this url refers to 943 $source_file = &unicode::url_to_filename($source file);943 $source_file = &unicode::url_to_filename($source_file); 944 944 my ($assocfilename) = $source_file =~ /([^\\\/]+)$/; 945 945 return $assocfilename;
Note:
See TracChangeset
for help on using the changeset viewer.