Index: openacs-4/packages/lorsm/www/sharer.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/Attic/sharer.tcl,v diff -u -r1.4 -r1.4.4.1 --- openacs-4/packages/lorsm/www/sharer.tcl 17 May 2005 17:03:40 -0000 1.4 +++ openacs-4/packages/lorsm/www/sharer.tcl 20 Dec 2006 12:31:12 -0000 1.4.4.1 @@ -48,7 +48,7 @@ {isshared:text(inform) {label "[_ lorsm.Current_Status]"} } - {share:text(radio) + {share_p:text(radio) {label Status?} {options {{"[_ lorsm.Shared]" t} {"[_ lorsm.Not_Shared]" f}}} } @@ -63,10 +63,10 @@ db_transaction { db_dml do_update { update ims_cp_manifests - set isshared = :share + set isshared = :share_p where man_id = :man_id } - if {$share == "t"} { + if {$share_p == "t"} { set party_id_students [db_string party_id {select segment_id from rel_segments \ where rel_type = 'dotlrn_student_profile_rel'}]