Index: openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl	29 Jun 2004 10:17:41 -0000	1.4
+++ openacs-4/packages/acs-lang/www/admin/message-usage-include.tcl	10 Jan 2007 21:22:04 -0000	1.5
@@ -28,8 +28,8 @@
             set colon [string first ":" $line]
             
             multirow append message_usage \
-                [string range $line 0 [expr $colon-1]] \
-                [string trim [string range $line [expr $colon+1] end]]
+                [string range $line 0 [expr {$colon-1}]] \
+                [string trim [string range $line [expr {$colon+1}] end]]
         }
     }
 }