Index: openacs-4/packages/bug-tracker/tcl/bug-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-procs.tcl,v
diff -u -N -r1.42 -r1.43
--- openacs-4/packages/bug-tracker/tcl/bug-procs.tcl	9 May 2018 15:33:29 -0000	1.42
+++ openacs-4/packages/bug-tracker/tcl/bug-procs.tcl	15 Jun 2018 22:47:45 -0000	1.43
@@ -100,7 +100,7 @@
     @return bug_id The same bug_id passed in, just for convenience.
     
 } {
-    if { (![info exists user_agent] || $user_agent eq "") && [ad_conn isconnected] } {
+    if { $user_agent eq "" && [ad_conn isconnected] } {
         set user_agent [ns_set get [ns_conn headers] "User-Agent"]
     }
 
@@ -219,7 +219,7 @@
 } {
     upvar $array row
 
-    if { (![info exists user_id] || $user_id eq "") } {
+    if { $user_id eq "" } {
         set user_id [ad_conn user_id]
     }