Index: openacs-4/packages/chat/www/chat-room-grant.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/chat-room-grant.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/chat/www/chat-room-grant.tcl	7 Aug 2017 23:48:07 -0000	1.5
+++ openacs-4/packages/chat/www/chat-room-grant.tcl	18 Jan 2019 17:14:36 -0000	1.6
@@ -1,5 +1,5 @@
 ad_page_contract {
-    
+
     @author David Dao (ddao@arsdigita.com)
     @creation-date November 16, 2000
     @cvs-id $Id$
@@ -39,3 +39,8 @@
 
 [ad_footer]
 "
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 2
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/chat-transcript.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/chat-transcript.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/chat/www/chat-transcript.tcl	20 Jan 2018 22:56:50 -0000	1.6
+++ openacs-4/packages/chat/www/chat-transcript.tcl	18 Jan 2019 17:14:36 -0000	1.7
@@ -3,9 +3,9 @@
 } {
    room_id:naturalnum,notnull
    {transcript_id:naturalnum,optional 0}
-} 
+}
 
-set page_title "[_ chat.Transcript]"   
+set page_title "[_ chat.Transcript]"
 set context [list $page_title]
 set user_id [ad_conn user_id]
 
@@ -17,20 +17,20 @@
     #Display unauthorize privilege page.
     ad_returnredirect unauthorized
     ad_script_abort
-}   
+}
 
 if { [catch {set room_name [chat_room_name $room_id]} errmsg] } {
     ad_return_complaint 1 "[_ chat.Room_not_found]"
     ad_script_abort
 }
 
-template::head::add_style -style "#messages { 
-    border: 1px dotted black; 
+template::head::add_style -style "#messages {
+    border: 1px dotted black;
     padding: 5px;
-    margin-top:10px; 
-    font-size: 12px; 
-    color: #666666; 
-    font-family: Trebuchet MS, Lucida Grande, Lucida Sans Unicode, Arial, sans-serif; 
+    margin-top:10px;
+    font-size: 12px;
+    color: #666666;
+    font-family: Trebuchet MS, Lucida Grande, Lucida Sans Unicode, Arial, sans-serif;
 }
 #messages .timestamp {vertical-align: top; color: #CCCCCC; }
 #messages .user {text-align: right; vertical-align: top; font-weight:bold; }
@@ -39,3 +39,8 @@
 
 ad_return_template
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 2
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/chat-transcripts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/chat-transcripts.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/chat/www/chat-transcripts.tcl	7 Aug 2017 23:48:07 -0000	1.4
+++ openacs-4/packages/chat/www/chat-transcripts.tcl	18 Jan 2019 17:14:36 -0000	1.5
@@ -6,7 +6,7 @@
     @creation-date March 26, 2006
 } {
     room_id:naturalnum,notnull
-} 
+}
 
 if { [catch {set room_name [chat_room_name $room_id]} errmsg] } {
     ad_return_complaint 1 "[_ chat.Room_not_found]"
@@ -15,3 +15,8 @@
 
 set active [room_active_status $room_id]
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 2
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/message-delete-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/message-delete-2.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/chat/www/message-delete-2.tcl	7 Aug 2017 23:48:07 -0000	1.9
+++ openacs-4/packages/chat/www/message-delete-2.tcl	18 Jan 2019 17:14:36 -0000	1.10
@@ -19,3 +19,9 @@
 ::chat::Chat flush_messages -chat_id $room_id
 
 ad_returnredirect .
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/message-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/message-delete.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/chat/www/message-delete.tcl	7 Aug 2017 23:48:07 -0000	1.8
+++ openacs-4/packages/chat/www/message-delete.tcl	18 Jan 2019 17:14:36 -0000	1.9
@@ -22,4 +22,10 @@
 
 set message_count [chat_message_count $room_id]
 
-ad_return_template
\ No newline at end of file
+ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/moderator-grant-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-grant-2.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/chat/www/moderator-grant-2.tcl	7 Aug 2017 23:48:07 -0000	1.4
+++ openacs-4/packages/chat/www/moderator-grant-2.tcl	18 Jan 2019 17:14:36 -0000	1.5
@@ -1,8 +1,8 @@
 #/chat/www/moderator-grant-2.tcl
 ad_page_contract {
-    
+
     Add moderator to a room.
-    
+
     @author David Dao (ddao@arsdigita.com)
     @creation-date November 17, 2000
     @cvs-id $Id$
@@ -16,3 +16,9 @@
 chat_moderator_grant $room_id $party_id
 
 ad_returnredirect "room?room_id=$room_id"
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/moderator-grant.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-grant.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/chat/www/moderator-grant.tcl	7 Aug 2017 23:48:07 -0000	1.6
+++ openacs-4/packages/chat/www/moderator-grant.tcl	18 Jan 2019 17:14:36 -0000	1.7
@@ -28,3 +28,8 @@
 
 ad_return_template grant-entry
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/moderator-revoke-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-revoke-2.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/chat/www/moderator-revoke-2.tcl	7 Aug 2017 23:48:07 -0000	1.4
+++ openacs-4/packages/chat/www/moderator-revoke-2.tcl	18 Jan 2019 17:14:36 -0000	1.5
@@ -15,4 +15,10 @@
 
 chat_moderator_revoke $room_id $party_id
 
-ad_returnredirect "room?room_id=$room_id"
\ No newline at end of file
+ad_returnredirect "room?room_id=$room_id"
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/moderator-revoke.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/moderator-revoke.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/chat/www/moderator-revoke.tcl	18 Jun 2018 14:30:00 -0000	1.8
+++ openacs-4/packages/chat/www/moderator-revoke.tcl	18 Jan 2019 17:14:36 -0000	1.9
@@ -18,3 +18,9 @@
 set party_pretty_name [acs_object_name $party_id]
 
 set pretty_name [chat_room_name $room_id]
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/noactive.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/noactive.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/chat/www/noactive.tcl	14 Mar 2006 12:16:09 -0000	1.1
+++ openacs-4/packages/chat/www/noactive.tcl	18 Jan 2019 17:14:36 -0000	1.2
@@ -12,3 +12,9 @@
 set context_bar [list "[_ chat.Unauthorized_privilege]"]
 
 ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/room-delete-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-delete-2.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/chat/www/room-delete-2.tcl	7 Aug 2017 23:48:07 -0000	1.8
+++ openacs-4/packages/chat/www/room-delete-2.tcl	18 Jan 2019 17:14:36 -0000	1.9
@@ -16,8 +16,10 @@
     ad_script_abort
 }
 
-ad_returnredirect . 
+ad_returnredirect .
 
-
-
-
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/room-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-delete.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/chat/www/room-delete.tcl	7 Aug 2017 23:48:07 -0000	1.8
+++ openacs-4/packages/chat/www/room-delete.tcl	18 Jan 2019 17:14:36 -0000	1.9
@@ -19,4 +19,10 @@
 
 set pretty_name [chat_room_name $room_id]
 
-ad_return_template
\ No newline at end of file
+ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/room-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room-edit.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/chat/www/room-edit.tcl	25 Jun 2018 14:46:38 -0000	1.15
+++ openacs-4/packages/chat/www/room-edit.tcl	18 Jan 2019 17:14:36 -0000	1.16
@@ -70,72 +70,72 @@
     {messages_time_window:integer
         {label "#chat.MessagesTimeWindow#" }
         {help_text "[_ chat.MessagesTimeWindowHelp]"}
-	{value "$four_hours"}
+        {value "$four_hours"}
     }
 
 } -new_data {
     if {[catch {
-	set room_id [chat_room_new \
-			 -moderated_p          $moderated_p \
-			 -description          $description \
-			 -active_p             $active_p \
-			 -archive_p            $archive_p \
-			 -auto_flush_p         $auto_flush_p \
-			 -auto_transcript_p    $auto_transcript_p \
-			 -login_messages_p     $login_messages_p \
-			 -logout_messages_p    $logout_messages_p \
-			 -messages_time_window $messages_time_window \
-			 -context_id           [ad_conn package_id] \
-			 -creation_user        [ad_conn user_id] \
-			 -creation_ip          [ad_conn peeraddr] $pretty_name]
+        set room_id [chat_room_new \
+            -moderated_p          $moderated_p \
+            -description          $description \
+            -active_p             $active_p \
+            -archive_p            $archive_p \
+            -auto_flush_p         $auto_flush_p \
+            -auto_transcript_p    $auto_transcript_p \
+            -login_messages_p     $login_messages_p \
+            -logout_messages_p    $logout_messages_p \
+            -messages_time_window $messages_time_window \
+            -context_id           [ad_conn package_id] \
+            -creation_user        [ad_conn user_id] \
+            -creation_ip          [ad_conn peeraddr] $pretty_name]
     } errmsg]} {
         ad_return_complaint 1 "[_ chat.Create_new_room_failed]: $errmsg"
         ad_script_abort
     }
     set comm_id ""
     if {[info commands dotlrn_community::get_community_id] ne ""} {
-	set comm_id [dotlrn_community::get_community_id]
+        set comm_id [dotlrn_community::get_community_id]
     }
     if {$comm_id ne ""} {
-	chat_user_grant $room_id $comm_id
+        chat_user_grant $room_id $comm_id
     } else {
-	#-2 Registered Users
-	#chat_user_grant $room_id -2
-	#0 Unregistered Visitor
-	#chat_user_grant $room_id 0
-	#-1 The Public
-	chat_user_grant $room_id -2
+        #-2 Registered Users
+        #chat_user_grant $room_id -2
+        #0 Unregistered Visitor
+        #chat_user_grant $room_id 0
+        #-1 The Public
+        chat_user_grant $room_id -2
     }
 } -edit_request {
     if {[catch {
-	chat_room_get -room_id $room_id -array r
-	set pretty_name          $r(pretty_name)
-	set description          $r(description)
-	set moderated_p          $r(moderated_p)
-	set archive_p            $r(archive_p)
-	set auto_flush_p         $r(auto_flush_p)
-	set auto_transcript_p    $r(auto_transcript_p)
-	set login_messages_p     $r(login_messages_p)
-	set logout_messages_p    $r(logout_messages_p)
-	set messages_time_window $r(messages_time_window)
+        chat_room_get -room_id $room_id -array r
+        set pretty_name          $r(pretty_name)
+        set description          $r(description)
+        set moderated_p          $r(moderated_p)
+        set archive_p            $r(archive_p)
+        set auto_flush_p         $r(auto_flush_p)
+        set auto_transcript_p    $r(auto_transcript_p)
+        set login_messages_p     $r(login_messages_p)
+        set logout_messages_p    $r(logout_messages_p)
+        set messages_time_window $r(messages_time_window)
     } errmsg]} {
-	ad_return_complaint 1 "[_ chat.Room_not_found]."
+        ad_return_complaint 1 "[_ chat.Room_not_found]."
         ad_script_abort
     }
 } -edit_data {
     if {[catch {
-	chat_room_edit \
-	    $room_id \
-	    $pretty_name \
-	    $description \
-	    $moderated_p \
-	    $active_p \
-	    $archive_p \
-	    $auto_flush_p \
-	    $auto_transcript_p \
-	    $login_messages_p \
-	    $logout_messages_p \
-	    $messages_time_window
+        chat_room_edit \
+            $room_id \
+            $pretty_name \
+            $description \
+            $moderated_p \
+            $active_p \
+            $archive_p \
+            $auto_flush_p \
+            $auto_transcript_p \
+            $login_messages_p \
+            $logout_messages_p \
+            $messages_time_window
     } errmsg]} {
         ad_return_complaint 1 "[_ chat.Could_not_update_room]: $errmsg"
         ad_script_abort
@@ -144,3 +144,9 @@
     ad_returnredirect "room?room_id=$room_id"
     ad_script_abort
 }
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/room.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/room.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/chat/www/room.tcl	21 Nov 2018 10:55:24 -0000	1.12
+++ openacs-4/packages/chat/www/room.tcl	18 Jan 2019 17:14:36 -0000	1.13
@@ -120,3 +120,9 @@
     }
 
 ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 2
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/search-3.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/search-3.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/chat/www/search-3.tcl	20 Jun 2016 08:37:04 -0000	1.6
+++ openacs-4/packages/chat/www/search-3.tcl	18 Jan 2019 17:14:36 -0000	1.7
@@ -15,3 +15,8 @@
 }
 ad_returnredirect "room?room_id=$room_id"
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/search.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/chat/www/search.tcl	20 Jun 2016 08:37:04 -0000	1.2
+++ openacs-4/packages/chat/www/search.tcl	18 Jan 2019 17:14:36 -0000	1.3
@@ -3,8 +3,8 @@
 } {
   type:notnull
   room_id:naturalnum,notnull
-} 
-    
+}
+
 set context [list "Users"]
 
 db_1row users_n_users {}
@@ -13,17 +13,22 @@
 set last_registration [lc_time_fmt $last_registration "%q"]
 
 set groups [db_html_select_value_options groups_select {
-    select groups.group_id, 
-           groups.group_name, 
-           m.num as n_members, 
-           c.num as n_components 
-    from   groups, 
-           (select group_id, count(*) as num 
-            from group_member_map group by group_id) m, 
-           (select group_id, count(*) as num 
-            from group_component_map group by group_id) c 
-    where  groups.group_id=m.group_id 
+    select groups.group_id,
+           groups.group_name,
+           m.num as n_members,
+           c.num as n_components
+    from   groups,
+           (select group_id, count(*) as num
+            from group_member_map group by group_id) m,
+           (select group_id, count(*) as num
+            from group_component_map group by group_id) c
+    where  groups.group_id=m.group_id
     and    groups.group_id = c.group_id
     order  by group_name
 } ]
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-delete-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-delete-2.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/chat/www/transcript-delete-2.tcl	7 Aug 2017 23:48:07 -0000	1.6
+++ openacs-4/packages/chat/www/transcript-delete-2.tcl	18 Jan 2019 17:14:36 -0000	1.7
@@ -4,16 +4,20 @@
 } {
     room_id:naturalnum,notnull
     transcript_id:naturalnum,notnull
-    
+
 }
 
 permission::require_permission -object_id $transcript_id -privilege chat_transcript_delete
 
-
-
 if { [catch {chat_transcript_delete $transcript_id} errmsg] } {
     ad_return_complaint 1 "[_ chat.Delete_transcript_failed]: $errmsg"
     ad_script_abort
 }
 
 ad_returnredirect "room?room_id=$room_id"
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-delete.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/chat/www/transcript-delete.tcl	7 Aug 2017 23:48:07 -0000	1.8
+++ openacs-4/packages/chat/www/transcript-delete.tcl	18 Jan 2019 17:14:36 -0000	1.9
@@ -23,3 +23,9 @@
 
 set context [list "[_ chat.Delete_transcript]"]
 ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-edit-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/transcript-edit-2.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/chat/www/transcript-edit-2.tcl	20 Jan 2018 22:56:50 -0000	1.10
+++ openacs-4/packages/chat/www/transcript-edit-2.tcl	18 Jan 2019 17:14:36 -0000	1.11
@@ -22,3 +22,9 @@
 
 ad_returnredirect "transcript-view?transcript_id=$transcript_id&room_id=$room_id"
 ad_script_abort
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-edit.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/chat/www/transcript-edit.tcl	17 Nov 2018 10:10:02 -0000	1.12
+++ openacs-4/packages/chat/www/transcript-edit.tcl	18 Jan 2019 17:14:36 -0000	1.13
@@ -24,30 +24,36 @@
 
 ad_form -name "edit-transcription" -edit_buttons [list [list [_ chat.Edit] next]] -has_edit 1 -form {
     {room_id:integer(hidden)
-	{value $room_id}
+        {value $room_id}
     }
     {transcript_id:integer(hidden)
-	{value $transcript_id}
+        {value $transcript_id}
     }
     {pretty_name:text(text)
-	{label "#chat.Transcript_name#" }
-	{value $pretty_name}
+        {label "#chat.Transcript_name#" }
+        {value $pretty_name}
     }
     {description:text(textarea),optional
-	{label "#chat.Description#" }
-	{html {rows 6 cols 65}}
-	{value $description}
+        {label "#chat.Description#" }
+        {html {rows 6 cols 65}}
+        {value $description}
     }
     {contents:text(textarea)
-	{label "#chat.Transcript#" }
-	{html {rows 6 cols 65}}
-	{value $contents}
+        {label "#chat.Transcript#" }
+        {html {rows 6 cols 65}}
+        {value $contents}
     }
 } -on_submit {
     if { [catch {chat_transcript_edit $transcript_id $pretty_name $description $contents} errmsg] } {
-	ad_return_complaint 1 "[_ chat.Could_not_update_transcript]: $errmsg"
+        ad_return_complaint 1 "[_ chat.Could_not_update_transcript]: $errmsg"
     } else {
-	ad_returnredirect [export_vars -base "chat-transcript" {transcript_id room_id}]
+        ad_returnredirect [export_vars -base "chat-transcript" {transcript_id room_id}]
     }
     ad_script_abort
 }
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-new-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/Attic/transcript-new-2.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/chat/www/transcript-new-2.tcl	20 Jun 2016 08:37:04 -0000	1.5
+++ openacs-4/packages/chat/www/transcript-new-2.tcl	18 Jan 2019 17:14:36 -0000	1.6
@@ -8,7 +8,7 @@
     {delete_messages:optional "off"}
     {deactivate_room:optional "off"}
     contents:trim,notnull,html
-} 
+}
 
 permission::require_permission -object_id $room_id -privilege chat_transcript_create
 
@@ -36,3 +36,8 @@
 
 ad_returnredirect "chat-transcript?room_id=$room_id&transcript_id=$transcript_id"
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-new.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/chat/www/transcript-new.tcl	20 Jun 2016 08:37:04 -0000	1.8
+++ openacs-4/packages/chat/www/transcript-new.tcl	18 Jan 2019 17:14:36 -0000	1.9
@@ -34,3 +34,8 @@
 
 ad_return_template "transcript-entry"
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/transcript-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/transcript-view.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/chat/www/transcript-view.tcl	7 Aug 2017 23:48:07 -0000	1.6
+++ openacs-4/packages/chat/www/transcript-view.tcl	18 Jan 2019 17:14:36 -0000	1.7
@@ -29,3 +29,9 @@
 }
 
 ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/unauthorized.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/unauthorized.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/chat/www/unauthorized.tcl	14 Mar 2006 12:16:09 -0000	1.3
+++ openacs-4/packages/chat/www/unauthorized.tcl	18 Jan 2019 17:14:36 -0000	1.4
@@ -11,4 +11,10 @@
 
 set context_bar [list "[_ chat.Unauthorized_privilege]"]
 
-ad_return_template
\ No newline at end of file
+ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/user-ban-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-ban-2.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/chat/www/user-ban-2.tcl	7 Aug 2017 23:48:07 -0000	1.5
+++ openacs-4/packages/chat/www/user-ban-2.tcl	18 Jan 2019 17:14:36 -0000	1.6
@@ -1,6 +1,6 @@
 #/chat/www/user-ban-2.tcl
 ad_page_contract {
-    
+
     Ban user.
 
     @author David Dao (ddao@arsdigita.com)
@@ -16,3 +16,9 @@
 chat_user_ban $room_id $party_id
 
 ad_returnredirect "room?room_id=$room_id"
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/user-ban.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-ban.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/chat/www/user-ban.tcl	7 Aug 2017 23:48:07 -0000	1.6
+++ openacs-4/packages/chat/www/user-ban.tcl	18 Jan 2019 17:14:36 -0000	1.7
@@ -1,6 +1,6 @@
 #/chat/www/user-ban.tcl
 ad_page_contract {
-    
+
     Explicit ban user from the chat room.
 
     @author David Dao (ddao@arsdigita.com)
@@ -28,3 +28,9 @@
 db_multirow parties list_parties {}
 
 ad_return_template grant-entry
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/user-unban-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-unban-2.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/chat/www/user-unban-2.tcl	7 Aug 2017 23:48:07 -0000	1.4
+++ openacs-4/packages/chat/www/user-unban-2.tcl	18 Jan 2019 17:14:36 -0000	1.5
@@ -16,3 +16,9 @@
 chat_user_unban $room_id $party_id
 
 ad_returnredirect "room?room_id=$room_id"
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End:
Index: openacs-4/packages/chat/www/user-unban.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/user-unban.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/chat/www/user-unban.tcl	18 Jun 2018 14:35:33 -0000	1.7
+++ openacs-4/packages/chat/www/user-unban.tcl	18 Jan 2019 17:14:36 -0000	1.8
@@ -1,6 +1,6 @@
 #/chat/www/user-unban.tcl
 ad_page_contract {
-    
+
     Display confirmation before unban user.
 
     @author David Dao (ddao@arsdigita.com)
@@ -20,3 +20,8 @@
 
 set pretty_name [chat_room_name $room_id]
 
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 2
+#    indent-tabs-mode: nil
+# End: