Index: openacs-4/contrib/packages/cop-ui/lib/contributions.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/cop-ui/lib/contributions.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/contrib/packages/cop-ui/lib/contributions.tcl	27 Apr 2004 10:56:35 -0000	1.1
+++ openacs-4/contrib/packages/cop-ui/lib/contributions.tcl	29 Apr 2004 15:56:04 -0000	1.2
@@ -68,7 +68,8 @@
             orderby lower(t.pretty_name)
         }
         last_modified { 
-            orderby o.last_modified
+            orderby_asc {o.last_modified desc}
+            orderby_desc {o.last_modified asc}
         }
         name {
             orderby_asc "lower(u.last_name),lower(u.first_names)"
@@ -95,7 +96,7 @@
      WHERE t.object_type = case when o.object_type = 'content_item' then i.content_type else o.object_type end
        and o.object_type in ('content_item','pinds_blog_entry','forums_forum','forums_message',
            'content_item','cal_item','bt_bug','bt_patch', 'faq', 'faq_q_and_a', 'bookshelf_book') 
-       and (o.object_type != 'content_item' or i.content_type in ('content_extlink','file_storage_object'))
+       and (o.object_type != 'content_item' or i.content_type in ('content_extlink','file_storage_object','pa_album','pa_photo'))
        and u.user_id = o.creation_user
        $restrict
    [template::list::orderby_clause -orderby -name "content"]" {
@@ -107,7 +108,7 @@
        } else { 
            set rating_img {}
        }
-       set last_modified [regsub -all { } [util::age_pretty -timestamp_ansi $last_modified -sysdate_ansi $now] {\ }]
+       set last_modified [regsub -all { } [util::age_pretty -hours_limit 0 -mode_2_fmt "%X %a" -mode_3_fmt "%x" -timestamp_ansi $last_modified -sysdate_ansi $now] {\ }]
        set user_url [acs_community_member_url -user_id $user_id]
        if {[catch {set url_one [acs_sc_call -error FtsContentProvider url [list $object_id] $object_type]} errMsg]} { 
            global errorCode