diff options
| author | Katsumi Yamaoka <[email protected]> | 2011-12-02 04:00:32 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <[email protected]> | 2011-12-02 04:00:32 +0000 |
| commit | 71c90957bf6d537092d057b743d31e1fd2992f75 (patch) | |
| tree | 77b9fcfe05c60b9b5df0b594b50bcbd2db7e2c3c | |
| parent | e8087a7609a4a279b6b6cbca947e9d845c760a9e (diff) | |
Gnus: Update the header format of icon data for the most recent icontopbm program.
| -rw-r--r-- | lisp/gnus/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/gnus/compface.el | 3 | ||||
| -rw-r--r-- | lisp/gnus/gnus-art.el | 9 |
3 files changed, 14 insertions, 4 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index b517c81b2b..fbfcda57b5 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,9 @@ +2011-12-02 Katsumi Yamaoka <[email protected]> + + * compface.el (uncompface): + * gnus-art.el (gnus-article-x-face-command): Update the header format + of icon data for the most recent icontopbm program. + 2011-12-01 Katsumi Yamaoka <[email protected]> * gnus-msg.el (gnus-inews-do-gcc): diff --git a/lisp/gnus/compface.el b/lisp/gnus/compface.el index 2a2383777c..e132f73626 100644 --- a/lisp/gnus/compface.el +++ b/lisp/gnus/compface.el @@ -42,7 +42,8 @@ or `faces-xface' and `netpbm' or `libgr-progs', for instance." 'delete '(t nil) nil)) (progn (goto-char (point-min)) - (insert "/* Width=48, Height=48 */\n") + (insert "/* Format_version=1, Width=48, Height=48, Depth=1,\ + Valid_bits_per_item=16 */\n") ;; I just can't get "icontopbm" to work correctly on its ;; own in XEmacs. And Emacs doesn't understand un-raw pbm ;; files. diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 60cd369875..555c715bc2 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el @@ -268,11 +268,14 @@ This can also be a list of the above values." (if (or (gnus-image-type-available-p 'xface) (gnus-image-type-available-p 'pbm)) 'gnus-display-x-face-in-from - "{ echo '/* Width=48, Height=48 */'; uncompface; } | icontopbm | ee -") + "{ echo \ +'/* Format_version=1, Width=48, Height=48, Depth=1, Valid_bits_per_item=16 */'\ +; uncompface; } | icontopbm | ee -") (if (gnus-image-type-available-p 'pbm) 'gnus-display-x-face-in-from - "{ echo '/* Width=48, Height=48 */'; uncompface; } | icontopbm | \ -display -")) + "{ echo \ +'/* Format_version=1, Width=48, Height=48, Depth=1, Valid_bits_per_item=16 */'\ +; uncompface; } | icontopbm | display -")) "*String or function to be executed to display an X-Face header. If it is a string, the command will be executed in a sub-shell asynchronously. The compressed face will be piped to this command." |