projects / elisp / riece.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: bdd38e1)
Fixed.
authorueno <ueno>
Fri, 18 Nov 2005 06:15:26 +0000 (06:15 +0000)
committerueno <ueno>
Fri, 18 Nov 2005 06:15:26 +0000 (06:15 +0000)
lisp/riece-develop.el patch | blob | history

diff --git a/lisp/riece-develop.el b/lisp/riece-develop.el
index 66b2157..87d4de3 100644 (file)
--- a/lisp/riece-develop.el
+++ b/lisp/riece-develop.el
@@ -1,6 +1,9 @@
 (defun riece-insert-struct-template (prefix struct)
   (interactive "sPrefix: 
 sStruct: ")
+  (if (and prefix
+          (not (string-match "-\\'" prefix)))
+      (setq prefix (concat prefix "-")))
   (let (attributes
        optional-attributes
        name