Index: openacs-4/packages/download/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/index.tcl,v diff -u -N -r1.13 -r1.14 --- openacs-4/packages/download/www/index.tcl 11 Oct 2013 10:29:31 -0000 1.13 +++ openacs-4/packages/download/www/index.tcl 11 Oct 2013 10:39:37 -0000 1.14 @@ -18,6 +18,15 @@ master_admin_p:onevalue } +# +# The following two lines severe as a guard against errors for +# outdated query parameters (spiders try often months later to refresh +# an entry). +# +if {[regexp {,(.*)$} $orderby _ suffix] && $suffix ni {asc desc}} { set orderby "archive_name,desc"} +if {[lindex [split $orderby ,] 0] ni {archive_name archive_type downloads}} { set orderby "archive_name,desc"} + + set return_url "[ad_conn url]?[ad_conn query]" set user_id [ad_conn user_id] @@ -76,10 +85,10 @@ archive_name { label "Software Name" display_template { - - -  @downloads_multirow.archive_name@ @downloads_multirow.version_name@ -  (@downloads_multirow.file_size@k)
@downloads_multirow.summary@ +
+
+
@downloads_multirow.archive_name@ @downloads_multirow.version_name@ +  (@downloads_multirow.file_size@k)
@downloads_multirow.summary@
} orderby "archive_name" } @@ -90,6 +99,7 @@ downloads { label "# Downloads" orderby "downloads" + html {align right} } }