Mercurial > hg > xemacs

diff shared/xml-hack.el @ 0:107d592c5f4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
DICE versions, used by pers/common, recursive, I think/hope
author Henry S. Thompson <ht@inf.ed.ac.uk>
date Mon, 08 Feb 2021 11:44:37 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/shared/xml-hack.el	Mon Feb 08 11:44:37 2021 +0000
@@ -0,0 +1,8 @@
+(defun sgml-tag-again ()
+  "Insert another of the tag we're in as sibling"
+  (interactive )
+  (let ((elt (sgml-element-name (sgml-find-element-of (point)))))
+    (sgml-up-element)
+    (sgml-insert-element elt)))
+
+(define-key sgml-mode-map "\C-cn" 'sgml-tag-again)