--- a/lisp/hm--html-menus/hm--html-indentation.el	Mon Aug 13 09:13:58 2007 +0200
+++ b/lisp/hm--html-menus/hm--html-indentation.el	Mon Aug 13 09:15:11 2007 +0200
@@ -151,7 +151,9 @@
 (defun hm--html-is-one-element-tag-p (tag-name)
   "Returns t, if the tag with the tag-name is a one element tag."
   (assoc :hm--html-one-element-tag
-	 (cdr (assoc* tag-name hm--html-tag-name-alist :test 'string=))))
+	 (cdr (assoc* (downcase tag-name)
+		      hm--html-tag-name-alist
+		      :test 'string=))))
 
 (defun hm--html-calculate-indent-according-to-previous-tags ()
   "Calculate the indent according to the previous tags in this line.