Changeset 16956

Timestamp:

2008-08-21T16:36:57+12:00 (16 years ago)

Author:

ak19

Message:

Associated file names are url-encoded

File:

• gsdl/trunk/perllib/plugins/RealMediaPlugin.pm (modified) (1 diff)

gsdl/trunk/perllib/plugins/RealMediaPlugin.pm

@@ -106 +106 @@
     $doc_obj->add_metadata($top_section, "srcicon", "<img src=\"_httpprefix_/images/irmvideo.gif\" title=\"Download\" border=0>");
 
-    # Add the actual filename as it exists on the file system as an associated file
-    # by making sure we undo any URL-encoding escaping there may be
-    $filename_no_path =~ s/%25/%/g;
-    $doc_obj->associate_file($filename_full_path, $filename_no_path, "RealMedia", $top_section);
+    # Add the actual filename as it exists on the file system (URL-encoded) as an 
+    # associated file by making sure we undo any escaped URL-encoding there may be
+    my $assoc_file = $doc_obj->get_assocfile_from_sourcefile(); # just url-encoded filename, no path
+    $doc_obj->associate_file($filename_full_path, $assoc_file, "RealMedia", $top_section);
 
 }