Mercurial > emacs

comparison lisp/gnus/gnus-fun.el @ 59996:aac0a33f5772

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change release version from 21.4 to 22.1 throughout. Change development version from 21.3.50 to 22.0.50.
author Kim F. Storm <storm@cua.dk>
date Wed, 09 Feb 2005 15:50:47 +0000
parents cee5a9d8ee71
children 18a818a2ee7c
comparison
equal deleted inserted replaced
59995:8f4938738427 59996:aac0a33f5772
32 (require 'gnus-ems) 32 (require 'gnus-ems)
33 (require 'gnus-util) 33 (require 'gnus-util)
34 34
35 (defcustom gnus-x-face-directory (expand-file-name "x-faces" gnus-directory) 35 (defcustom gnus-x-face-directory (expand-file-name "x-faces" gnus-directory)
36 "*Directory where X-Face PBM files are stored." 36 "*Directory where X-Face PBM files are stored."
37 :version "21.4" 37 :version "22.1"
38 :group 'gnus-fun 38 :group 'gnus-fun
39 :type 'directory) 39 :type 'directory)
40 40
41 (defcustom gnus-convert-pbm-to-x-face-command "pbmtoxbm %s | compface" 41 (defcustom gnus-convert-pbm-to-x-face-command "pbmtoxbm %s | compface"
42 "Command for converting a PBM to an X-Face." 42 "Command for converting a PBM to an X-Face."
43 :version "21.4" 43 :version "22.1"
44 :group 'gnus-fun 44 :group 'gnus-fun
45 :type 'string) 45 :type 'string)
46 46
47 (defcustom gnus-convert-image-to-x-face-command "giftopnm %s | ppmnorm | pnmscale -width 48 -height 48 | ppmtopgm | pgmtopbm | pbmtoxbm | compface" 47 (defcustom gnus-convert-image-to-x-face-command "giftopnm %s | ppmnorm | pnmscale -width 48 -height 48 | ppmtopgm | pgmtopbm | pbmtoxbm | compface"
48 "Command for converting an image to an X-Face. 48 "Command for converting an image to an X-Face.
49 By default it takes a GIF filename and output the X-Face header data 49 By default it takes a GIF filename and output the X-Face header data
50 on stdout." 50 on stdout."
51 :version "21.4" 51 :version "22.1"
52 :group 'gnus-fun 52 :group 'gnus-fun
53 :type 'string) 53 :type 'string)
54 54
55 (defcustom gnus-convert-image-to-face-command "djpeg %s | ppmnorm | pnmscale -width 48 -height 48 | ppmquant %d | pnmtopng" 55 (defcustom gnus-convert-image-to-face-command "djpeg %s | ppmnorm | pnmscale -width 48 -height 48 | ppmquant %d | pnmtopng"
56 "Command for converting an image to an Face. 56 "Command for converting an image to an Face.
57 By default it takes a JPEG filename and output the Face header data 57 By default it takes a JPEG filename and output the Face header data
58 on stdout." 58 on stdout."
59 :version "21.4" 59 :version "22.1"
60 :group 'gnus-fun 60 :group 'gnus-fun
61 :type 'string) 61 :type 'string)
62 62
63 (defun gnus-shell-command-to-string (command) 63 (defun gnus-shell-command-to-string (command)
64 "Like `shell-command-to-string' except not mingling ERROR." 64 "Like `shell-command-to-string' except not mingling ERROR."