Index: openacs-4/packages/acs-mail-lite/lib/email.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/lib/Attic/email.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/acs-mail-lite/lib/email.tcl	3 Oct 2005 19:07:59 -0000	1.10
+++ openacs-4/packages/acs-mail-lite/lib/email.tcl	11 Oct 2005 15:05:23 -0000	1.11
@@ -87,7 +87,7 @@
     set files [list]
     foreach file $file_ids {
 	set file_title [db_string get_file_title { select title from cr_revisions where revision_id = :file} -default "Untitled"]
-	lappend files "<a href=\"/tracking/download/?file_id=$file\">$file_title</a> "
+	lappend files "<a href=\"/tracking/download/$file_title?version_id=$file\">$file_title</a> "
     }
     set files [join $files ", "]