Index: openacs-4/packages/dotlrn/www/admin/class.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/dotlrn/www/admin/class.tcl	15 May 2007 20:14:25 -0000	1.20
+++ openacs-4/packages/dotlrn/www/admin/class.tcl	1 Nov 2013 21:08:33 -0000	1.21
@@ -74,7 +74,7 @@
     set page_query select_all_class_instances_paginator
 }
 
-if { ![empty_string_p $keyword] } {
+if { $keyword ne "" } {
     set keyword_clause [db_map class_instances_keyword]
 } else {
     set keyword_clause ""