Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -r1.81 -r1.82 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 10 Aug 2007 18:39:22 -0000 1.81 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 13 Aug 2007 13:52:11 -0000 1.82 @@ -145,7 +145,8 @@ #my msg "lang=$lang name=$name" set encoded_name [string map [list %2d - %5f _ %2e .] [ns_urlencode $name]] if {$download} { - set url ${host}${package_prefix}download/${lang}/$encoded_name$anchor + #set url ${host}${package_prefix}download/${lang}/$encoded_name$anchor + set url ${host}${package_prefix}download/file/$encoded_name$anchor } elseif {$lang ne $default_lang || [[self class] exists www-file($name)]} { set url ${host}${package_prefix}${lang}/$encoded_name$anchor } else { @@ -466,6 +467,9 @@ if {$item_id == 0 && $lang eq "download" && [regexp {^([^/]+)/(.*)$} $local_name _ prefix base_name]} { set item_id [::Generic::CrItem lookup -name ${prefix}:$base_name -parent_id $folder_id] + if {$item_id == 0} { + set item_id [::Generic::CrItem lookup -name image:$base_name -parent_id $folder_id] + } if {$item_id != 0} { upvar $method_var method set method download