Index: openacs-4/packages/dotlrn/tcl/applets-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/applets-procs.tcl,v
diff -u -N -r1.25 -r1.26
--- openacs-4/packages/dotlrn/tcl/applets-procs.tcl	1 Nov 2013 21:54:12 -0000	1.25
+++ openacs-4/packages/dotlrn/tcl/applets-procs.tcl	7 Aug 2017 23:48:09 -0000	1.26
@@ -36,11 +36,7 @@
     }
 
     ad_proc -public is_initalized {} {
-        if {[site_node::exists_p -url "[get_url]/"]} {
-            return 1
-        } else {
-            return 0
-        }
+        return [site_node::exists_p -url "[get_url]/"]
     }
 
     ad_proc -public init {} {
@@ -186,3 +182,9 @@
 
 }
 
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: