(save-excursion
(insert "</" name ">")))))
-(define-key nxml-mode-map (kbd "\C-c ." ) 'nxml-complete-and-autoclose-element)
+(define-key nxml-mode-map (kbd "\C-c .") 'nxml-complete-and-autoclose-element)
+(define-key nxml-mode-map (kbd "\C-c ,") 'nxml-complete)
+
(define-key nxml-mode-map (kbd "\C-c\C-c") 'recompile)
(defconst nxml-docbook-common-elements
'(("section" . ("para" "itemizedlist" "variablelist" "section" "bridgehead" "task" "procedure"
"title"))
+ ("refsect1" . ("title" "para" "itemizedlist" "variablelist" "screen" "refsect2"))
+ ("refsect2" . ("title" "para" "itemizedlilst" "variablelist" "screen"))
("para" . ("emphasis" "code" "replaceable" "literal"))
("emphasis" . ("code"))
("itemizedlist" . ("listitem"))