Index: openacs-4/packages/categories/lib/contributions.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/lib/contributions.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/categories/lib/contributions.tcl 27 Oct 2014 16:41:10 -0000 1.4 +++ openacs-4/packages/categories/lib/contributions.tcl 7 Aug 2017 23:48:05 -0000 1.5 @@ -10,8 +10,8 @@ if {![info exists category]} { set category {} } -if {[info exists supress]} { - foreach key $supress { +if {[info exists suppress]} { + foreach key $suppress { set hide($key) 1 } } @@ -149,4 +149,9 @@ global errorCode set url_one $errorCode } - } \ No newline at end of file + } +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: