From 9181c3ff5a7cef076422e387edebd8a66b2e769e Mon Sep 17 00:00:00 2001
From: Daiki Ueno <ueno@unixuser.org>
Date: Fri, 18 Nov 2005 06:15:26 +0000
Subject: [PATCH] Fixed.

---
 lisp/riece-develop.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lisp/riece-develop.el b/lisp/riece-develop.el
index 66b2157..87d4de3 100644
--- 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
-- 
2.25.1