X-Git-Url: https://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fgnus-picon.el;h=db78d90509eb2ec58ec3dc495455750dae774263;hp=856c5f39bda87f3e7f9b138b4d32a324b9433f22;hb=f6059964525ddd9f9bbdb1da7b73034af70e07cb;hpb=e6c35a20a80021260e2ba160c594b6ce35953238

diff --git a/lisp/gnus-picon.el b/lisp/gnus-picon.el
index 856c5f39b..db78d9050 100644
--- a/lisp/gnus-picon.el
+++ b/lisp/gnus-picon.el
@@ -351,7 +351,7 @@ arguments necessary for the job.")
 
 (defun gnus-picons-lookup (addrs dirs)
   "Lookup the picon for ADDRS in databases DIRS.
-Returns the picon filename or NIL if none found."
+Returns the picon filename or nil if none found."
   (let (result)
     (while (and dirs (null result))
       (setq result (gnus-picons-lookup-internal addrs (pop dirs))))
@@ -381,7 +381,7 @@ DOMAINS is a list of strings from the fully qualified domain name."
 
 (defun gnus-picons-lookup-pairs (domains directories)
   "Lookup picons for DOMAINS and all its parents in DIRECTORIES.
-Returns a list of PAIRS whose CAR is the picon filename or NIL if
+Returns a list of PAIRS whose CAR is the picon filename or nil if
 none, and whose CDR is the corresponding element of DOMAINS."
   (let (picons)
     (setq directories (if (listp directories)