Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl,v
diff -u -N -r1.63 -r1.64
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl	17 Jul 2018 13:32:18 -0000	1.63
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl	5 Mar 2019 14:22:58 -0000	1.64
@@ -1230,7 +1230,7 @@
 
     db_foreach get_patches_for_bug {} {
 
-        set status_indicator [ad_decode $show_patch_status "all" "($status)" ""]
+        set status_indicator [expr {$show_patch_status eq "all" ? "($status)" : ""}]
         lappend patch_list "<a href=\"patch?patch_number=$patch_number\" title=\"patch $patch_number\">[ns_quotehtml $summary]</a> $status_indicator"
     } if_no_rows {
         set patches_name [bug_tracker::conn patches]