(smiley-style): Move definition later to avoid a

compilation warning.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 676421a..8437821 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-04-12  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * smiley.el (smiley-style): Move definition later to avoid a
+       compilation warning.
+
 2006-04-12  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (gnus-mime-copy-part): Find name parameter in

diff --git a/lisp/smiley.el b/lisp/smiley.el
index 2f081e3..6e0227f 100644 (file)
--- a/lisp/smiley.el
+++ b/lisp/smiley.el
@@ -58,6 +58,15 @@
   "Turn :-)'s into real images."
   :group 'gnus-visual)
 
+(defcustom smiley-data-directory (smiley-directory)
+  "*Location of the smiley faces files."
+  :set (lambda (symbol value)
+        (set-default symbol value)
+        (smiley-update-cache))
+  :initialize 'custom-initialize-default
+  :type 'directory
+  :group 'smiley)
+
 ;; Maybe this should go.
 (defcustom smiley-style 'low-color
   "Smiley style."
@@ -86,15 +95,6 @@ is nil, use `smiley-style'."
                 ((eq smiley-style 'medium) "/medium")
                 ((eq smiley-style 'grayscale) "/grayscale")))))
 
-(defcustom smiley-data-directory (smiley-directory)
-  "*Location of the smiley faces files."
-  :set (lambda (symbol value)
-        (set-default symbol value)
-        (smiley-update-cache))
-  :initialize 'custom-initialize-default
-  :type 'directory
-  :group 'smiley)
-
 ;; The XEmacs version has a baroque, if not rococo, set of these.
 (defcustom smiley-regexp-alist
   '(("\\(;-?)\\)\\W" 1 "blink")