Index: openacs-4/packages/new-portal/tcl/test/new-portal-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/test/new-portal-test-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/new-portal/tcl/test/new-portal-test-procs.tcl	7 Aug 2017 23:48:12 -0000	1.3
+++ openacs-4/packages/new-portal/tcl/test/new-portal-test-procs.tcl	19 Jul 2018 12:26:39 -0000	1.4
@@ -49,7 +49,7 @@
                 and p1.pretty_name = p2.pretty_name
                 "]
 
-            aa_true "Pages in correct order" [expr {$correct_page_count == 3}]
+            aa_true "Pages in correct order" {$correct_page_count == 3}
 	}
 
 }