From 5fa25097dbcb43bddc0bbc8c8997123f6a4f17ae Mon Sep 17 00:00:00 2001
From: 10sr <8slashes+git@gmail.com>
Date: Wed, 28 Nov 2012 17:42:15 +0900
Subject: [PATCH] show message on autoload defined

---
 emacs.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/emacs.el b/emacs.el
index 395d023..3b2014a 100644
--- a/emacs.el
+++ b/emacs.el
@@ -104,13 +104,17 @@ found, otherwise returns nil."
     (and libpath
          `(progn
             ,@(mapcar (lambda (f)
-                        (or (fboundp f)
+                        (unless (fboundp f)
+                          (progn
+                            (message "Autoloaded function `%S' defined (%s)"
+                                     f
+                                     libpath)
                             `(autoload (quote ,f)
                                ,libname
                                ,(concat "Autoloaded function defined in \""
                                         libpath
                                         "\".")
-                               t)))
+                               t))))
                       (or (eval functions)
                           `(,(eval feature))))
             (eval-after-load ,feature