+2003-01-16 Simon Josefsson <jas@extundo.com>
+
+ * gnus-fun.el (gnus-convert-image-to-x-face-command)
+ (gnus-convert-image-to-face-command, gnus-x-face-from-file)
+ (gnus-face-from-file): Doc fix; don't mention image format.
+
2003-01-16 Teodor Zlatanov <tzz@lifelogs.com>
* spam.el (spam-get-article-as-filename): new function (unused for now)
:type 'string)
(defcustom gnus-convert-image-to-x-face-command "giftopnm %s | ppmnorm | pnmscale -width 48 -height 48 | ppmtopgm | pgmtopbm | pbmtoxbm | compface"
- "Command for converting a GIF to an X-Face."
+ "Command for converting an image to an X-Face."
:group 'gnus-fun
:type 'string)
(defcustom gnus-convert-image-to-face-command "djpeg %s | ppmnorm | pnmscale -width 48 -height 48 | ppmquant %d | pnmtopng"
- "Command for converting a GIF to an X-Face."
+ "Command for converting an image to an X-Face."
:group 'gnus-fun
:type 'string)
;;;###autoload
(defun gnus-x-face-from-file (file)
- "Insert an X-Face header based on a GIF image file."
+ "Insert an X-Face header based on an image file."
(interactive "fImage file name: ")
(when (file-exists-p file)
(gnus-shell-command-to-string
;;;###autoload
(defun gnus-face-from-file (file)
- "Return an Face header based on a JPEG image file."
+ "Return an Face header based on an image file."
(interactive "fImage file name: ")
(when (file-exists-p file)
(let ((done nil)