Index: openacs-4/packages/acs-subsite/www/admin/themes/set.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/themes/set.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-subsite/www/admin/themes/set.tcl	19 Jan 2018 21:23:51 -0000	1.3
+++ openacs-4/packages/acs-subsite/www/admin/themes/set.tcl	3 Sep 2024 15:37:34 -0000	1.4
@@ -7,15 +7,21 @@
     theme:trim
 } -validate {
     new_key_valid -requires new_key {
-	if {![db_string check_exists_theme {
-	    select 1 from subsite_themes where key = :theme
-	} -default 0]} {
-	    ad_complain "Theme with key '$theme' does not exist" 
-	}
+        if {![db_string check_exists_theme {
+            select 1 from subsite_themes where key = :theme
+        } -default 0]} {
+            ad_complain "Theme with key '$theme' does not exist"
+        }
     }
 }
 
 subsite::set_theme -theme $theme
 
 ns_returnredirect "."
 ad_script_abort
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: