(wl-template-select): Cause error if

`wl-template-alist' is nil.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index b796cd4..2e78f75 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2005-02-09  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-template.el (wl-template-select): Cause error if
+       `wl-template-alist' is nil.
+
 2005-02-06  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
        * wl-news.el.in: Set file variable `no-byte-compile'.

diff --git a/wl/wl-template.el b/wl/wl-template.el
index 21c106d..b1f9230 100644 (file)
--- a/wl/wl-template.el
+++ b/wl/wl-template.el
@@ -93,6 +93,8 @@ Entering WL-Template mode calls the value of `wl-template-mode-hook'."
 (defun wl-template-select (&optional arg)
   "Select template from `wl-template-alist'."
   (interactive "P")
+  (unless wl-template-alist
+    (error "Please set `wl-template-alist'"))
   (if (not (if arg
               (not wl-template-visible-select)
             wl-template-visible-select))