Index: openacs-4/packages/acs-templating/tcl/style-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/style-procs.tcl,v
diff -u -r1.1.2.4 -r1.1.2.5
--- openacs-4/packages/acs-templating/tcl/style-procs.tcl	19 Apr 2022 11:55:07 -0000	1.1.2.4
+++ openacs-4/packages/acs-templating/tcl/style-procs.tcl	19 Apr 2022 17:35:05 -0000	1.1.2.5
@@ -126,11 +126,11 @@
             set template {<i class='$name$class' title='$title' aria-hidden='true' $styleAtt></i>}
         }
         "text" {
-            set alt [expr {[info exists alt] ? $alt : $title}]
+            if {$alt eq ""} {set alt $title}
             set template {<span class='$class' title='$title' $styleAtt>$alt</span>}
         }
         default {
-            set alt [expr {[info exists alt] ? $alt : $title}]
+            if {$alt eq ""} {set alt $title}
             set template {<img class='$class' src='$name' height='16' width='16' title='$title' alt='$alt' style='border:0; $styleAtt'>}
         }
     }