Index: openacs-4/packages/chat-portlet/tcl/chat-admin-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat-portlet/tcl/chat-admin-portlet-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/chat-portlet/tcl/chat-admin-portlet-procs.tcl	29 Jun 2018 17:27:19 -0000	1.2
+++ openacs-4/packages/chat-portlet/tcl/chat-admin-portlet-procs.tcl	3 Sep 2024 15:37:36 -0000	1.3
@@ -33,6 +33,8 @@
 
     ad_proc -public get_pretty_name {
     } {
+        Return portlet pretty name
+    } {
         return "#chat-portlet.admin_pretty_name#"
     }
 
@@ -43,6 +45,8 @@
 
     ad_proc -public link {
     } {
+        Return portlet link
+    } {
         return ""
     }
 
@@ -69,7 +73,7 @@
     ad_proc -public remove_self_from_page {
         {-portal_id:required}
     } {
-          Removes a chat admin PE from the given page
+        Removes a chat admin PE from the given page
     } {
         portal::remove_element \
             -portal_id $portal_id \
@@ -79,6 +83,7 @@
     ad_proc -public show {
          cf
     } {
+        Show the portlet
     } {
         portal::show_proc_helper \
             -package_key [my_package_key] \
@@ -88,3 +93,9 @@
     }
 
 }
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: