Index: openacs-4/packages/acs-templating/tcl/tag-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/tag-init.tcl,v
diff -u -r1.49.2.30 -r1.49.2.31
--- openacs-4/packages/acs-templating/tcl/tag-init.tcl	11 Jul 2023 13:18:58 -0000	1.49.2.30
+++ openacs-4/packages/acs-templating/tcl/tag-init.tcl	17 Jul 2023 17:26:43 -0000	1.49.2.31
@@ -1056,8 +1056,8 @@
     #    - "tag" (default "button")
     #    - "toggle"
     #    - "target"
-    #    - "type" (default "button")
-    # The attribute "type" is just valid when "tag" is "button".
+    #    - "type" (default "button", just used for "button" tag)
+    #    - "href" (default "#", just used for "a" tag)
     #
     # Use <... tag="a"... > for use of tabs with Bootstrap 3.
     #
@@ -1068,8 +1068,10 @@
     set data [expr {[template::toolkit] eq "bootstrap5" ? "data-bs" : "data"}]
 
     set tag [ns_set iget $params tag button]
-    if {$tag eq "button"} {
-        set attributes " type='[ns_set iget $params type button]'"
+    switch $tag {
+        "button" {set attributes " type='[ns_set iget $params type button]'"}
+        "a"      {set attributes " type='[ns_set iget $params href #]'"}
+        default  {set attributes ""}
     }
     append attributes \
         " class='[ns_set iget $params class]'" \