/[emacs]/emacs/lisp/gnus/gnus-fun.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-fun.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by ttn, Sat Aug 6 19:51:41 2005 UTC revision 1.8 by miles, Mon Sep 5 23:58:07 2005 UTC
# Line 54  on stdout." Line 54  on stdout."
54    :type 'string)    :type 'string)
55    
56  (defcustom gnus-convert-image-to-face-command "djpeg %s | ppmnorm | pnmscale -width 48 -height 48 | ppmquant %d | pnmtopng"  (defcustom gnus-convert-image-to-face-command "djpeg %s | ppmnorm | pnmscale -width 48 -height 48 | ppmquant %d | pnmtopng"
57    "Command for converting an image to an Face.    "Command for converting an image to a Face.
58  By default it takes a JPEG filename and output the Face header data  By default it takes a JPEG filename and output the Face header data
59  on stdout."  on stdout."
60    :version "22.1"    :version "22.1"
# Line 110  Output to the current buffer, replace te Line 110  Output to the current buffer, replace te
110    
111  ;;;###autoload  ;;;###autoload
112  (defun gnus-face-from-file (file)  (defun gnus-face-from-file (file)
113    "Return an Face header based on an image file."    "Return a Face header based on an image file."
114    (interactive "fImage file name (by default JPEG): ")    (interactive "fImage file name (by default JPEG): ")
115    (when (file-exists-p file)    (when (file-exists-p file)
116      (let ((done nil)      (let ((done nil)

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26