Index: openacs-4/packages/user-tracking/www/communities-card.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/communities-card.tcl,v diff -u -N -r1.2 -r1.2.2.1 --- openacs-4/packages/user-tracking/www/communities-card.tcl 14 Apr 2005 15:44:27 -0000 1.2 +++ openacs-4/packages/user-tracking/www/communities-card.tcl 28 Jun 2005 08:03:12 -0000 1.2.2.1 @@ -41,6 +41,7 @@ NofMembers:onevalue NofUsers:onevalue NofAdmin:onevalue + LastLine:onevalue } @@ -110,7 +111,7 @@ set DataFileName [user-tracking::get_data_file_name $community_id "" $config $year $month] set hidden [export_vars -form {community_id}] -set hidden2 [export_vars -form { {config} {url "communities-card"} {onlylines $community_id} }] +set LastLine "" if {$asked_date <= $today } { @@ -180,6 +181,9 @@ TotalUnique { set TotalUnique [lindex $campos 1] } + LastLine { + set LastLine [user-tracking::converts_date [lindex $campos 1]] + } default {} } set i [expr $i - 1] @@ -268,5 +272,7 @@ } } } +set hidden2 [export_vars -form { {config} {url "communities-card"} {onlylines $community_id} {year $year} {month $month} {LastTime $LastLine} }] + ad_return_template