Changeset 2220
- Timestamp:
- 06/09/07 22:22:19 (2 years ago)
- Files:
-
- Trunk/Scripts/Audio_scripts/UserSubmission.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
Trunk/Scripts/Audio_scripts/UserSubmission.pm
r2210 r2220 65 65 my ($audio_dir_name,$path); 66 66 ($audio_dir_name,$path,$AudioDirParms {"suffix"}) = fileparse($tarfile,@suffixlist); 67 $audio_dir_name =~ s/\. //;67 $audio_dir_name =~ s/\.$//; 68 68 $AudioDirParms {"audio_dir_name"} = $audio_dir_name; 69 69