* riece-develop.el: New file.

[riece] / lisp / riece-complete.el

diff --git a/lisp/riece-complete.el b/lisp/riece-complete.el
index 902d364..2354a1e 100644 (file)
--- a/lisp/riece-complete.el
+++ b/lisp/riece-complete.el
@@ -24,6 +24,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))      ;butlast
+
 (require 'riece-compat)
 
 (defvar riece-minibuffer-map
@@ -53,7 +55,7 @@
 ;;; stolen (and renamed) from crm.el.
 (defvar riece-completing-read-multiple-separator ",")
 (defvar riece-completing-read-multiple-table nil)
-  
+
 (defun riece-completing-read-multiple-1 (string predicate flag)
   "Function used by `riece-completing-read-multiple'.
 The value of STRING is the string to be completed.