Commit 0349f810a0f7d19c24acbcc244f880afca3f7e9a

Greg Pfeil 2011-03-18T22:28:58

Changed some exported names to more clearly explain what they do.

diff --git a/gravatar.lisp b/gravatar.lisp
index d48be14..0652389 100644
--- a/gravatar.lisp
+++ b/gravatar.lisp
@@ -10,7 +10,7 @@
                                                                   email)))
                                    'list))))
 
-(defun image (email &key size default force-default-p rating)
+(defun image-url (email &key size default force-default-p rating)
   "DEFAULT may be either a URL to your own image, or one of :404, :mm,
    :identicon, :monsterid, :wavatar, or :retro. RATING may be one of :g, :pg,
    :r, or :x."
@@ -48,5 +48,5 @@
                           (when js-callback
                             `(("callback" . ,js-callback))))))))
 
-(defun qr-code (email &optional size)
+(defun qr-code-url (email &optional size)
   (generate-profile-url email :qr (when size `(("s" . ,size)))))
diff --git a/package.lisp b/package.lisp
index 2163dc3..c165ffe 100644
--- a/package.lisp
+++ b/package.lisp
@@ -1,3 +1,3 @@
 (defpackage gravatar
   (:use #:cl)
-  (:export #:image #:profile #:qr-code))
+  (:export #:image-url #:profile #:qr-code-url))