* liece-ctcp.el: Remove autoload cookies of

`liece-command-ctcp-generic',
`liece-command-ctcp-userinfo-from-minibuffer',
`liece-command-ctcp-x-face-from-xbm-file' and
`liece-command-send-file'.

* liece-commands.el: Add autoload setting for
`liece-command-ctcp-action',
`liece-command-ctcp-userinfo-from-minibuffer' and
`liece-command-ctcp-x-face-from-xbm-file'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f992663..68ab7be 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,15 @@
 2000-10-19   Daiki Ueno  <ueno@unixuser.org>
 
+       * liece-ctcp.el: Remove autoload cookies of
+       `liece-command-ctcp-generic',
+       `liece-command-ctcp-userinfo-from-minibuffer',
+       `liece-command-ctcp-x-face-from-xbm-file' and
+       `liece-command-send-file'.
+
        * liece-commands.el: Add autoload setting for
-       `liece-command-ctcp-action'.
+       `liece-command-ctcp-action',
+       `liece-command-ctcp-userinfo-from-minibuffer' and
+       `liece-command-ctcp-x-face-from-xbm-file'.
 
 2000-10-16   Daiki Ueno  <ueno@unixuser.org>
 

diff --git a/lisp/liece-commands.el b/lisp/liece-commands.el
index aa321a1..4ccf3ed 100644 (file)
--- a/lisp/liece-commands.el
+++ b/lisp/liece-commands.el
@@ -40,15 +40,17 @@
 
 (autoload 'liece-dcc-chat-send "liece-dcc")
 
+(autoload 'liece-command-ctcp-action "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-version "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-userinfo "liece-ctcp" nil t)
+(autoload 'liece-command-ctcp-userinfo-from-minibuffer "liece-ctcp" nil t)
+(autoload 'liece-command-ctcp-help "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-clientinfo "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-ping "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-time "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-x-face "liece-ctcp" nil t)
+(autoload 'liece-command-ctcp-x-face-from-xbm-file "liece-ctcp" nil t)
 (autoload 'liece-command-ctcp-comment "liece-ctcp" nil t)
-(autoload 'liece-command-ctcp-help "liece-ctcp" nil t)
-(autoload 'liece-command-ctcp-action "liece-ctcp" nil t)
 
 (defun liece-command-poll-names ()
   "Handler for polling NAMES."

diff --git a/lisp/liece-ctcp.el b/lisp/liece-ctcp.el
index 1a0b605..238f8ec 100644 (file)
--- a/lisp/liece-ctcp.el
+++ b/lisp/liece-ctcp.el
@@ -544,7 +544,6 @@
 (define-obsolete-function-alias 'liece-command-send-action
   'liece-command-ctcp-action)
 
-;;;###liece-autoload
 (defun liece-command-ctcp-generic (nick command)
   "Ask about someones client clientinfo."
   (interactive (list (liece-complete-client) (liece-complete-query)))
@@ -555,14 +554,12 @@
       (setq liece-ctcp-ping-time (current-time)))
   (liece-send "PRIVMSG %s :\001%s\001" nick command))
 
-;;;###liece-autoload
 (defun liece-command-ctcp-userinfo-from-minibuffer (info)
   "Ask about someones client clientinfo."
   (interactive
    (list (read-from-minibuffer "New userinfo: " liece-ctcp-userinfo)))
   (setq liece-ctcp-userinfo info))
 
-;;;###liece-autoload
 (defun liece-command-ctcp-x-face-from-xbm-file (file)
   (interactive "fXBM File: ")
   (let (data)
@@ -571,7 +568,6 @@
         (setq liece-ctcp-x-face
               (replace-in-string (cadr (nth 3 data)) "[ \t\n]" "")))))
 
-;;;###liece-autoload
 (defun liece-command-send-file (file to)
   "Send a file to given  user."
   (interactive "fFile name: \nsTo whom: ")