Index: openacs-4/packages/user-tracking/www/visited-material/top.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/user-tracking/www/visited-material/top.tcl,v diff -u -N -r1.1 -r1.1.2.1 --- openacs-4/packages/user-tracking/www/visited-material/top.tcl 14 Apr 2005 15:44:29 -0000 1.1 +++ openacs-4/packages/user-tracking/www/visited-material/top.tcl 21 Nov 2005 15:05:54 -0000 1.1.2.1 @@ -152,7 +152,7 @@ set campos [split $linea] set patron "(END_EXTRA_${Extra})" if { ![regexp $patron $linea todo part1] } { - multirow append Objects [lindex $campos 0] [lindex $campos 1] [lindex $campos 2] [lindex $campos 3] [user-tracking::converts_date [lindex $campos 4]] $ExtraTypes($Extra) "$ExtraLinks($Extra)?DataFileName=$DataFileName" + multirow append Objects [lindex $campos 0] [lindex $campos 1] [lindex $campos 2] [lindex $campos 3] [user-tracking::converts_date [lindex $campos 4]] $ExtraTypes($Extra) "$ExtraLinks($Extra)?DataFileName=$DataFileName&user_id=$user_id&community_id=$community_id" set i [expr $i - 1] } else { set i 0