Edit file File name : compface.elc Content :;ELC ;;; Compiled ;;; in Emacs version 26.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@223 Convert FACE to pbm. Requires the external programs `uncompface', and `icontopbm'. On a GNU/Linux system these might be in packages with names like `compface' or `faces-xface' and `netpbm' or `libgr-progs', for instance. (defalias 'uncompface #[(face) "\304\305!rq\210\306\216\307\310!\210 c\210\311\312\313ed\314\315\316%\317=\2055 eb\210\320c\210\313ed\321\315\322%\317=\2055 \323 -\207" [#1=#:temp-buffer face coding-system-for-write coding-system-for-read generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1# buffer-name kill-buffer] 2] set-buffer-multibyte nil raw-text binary call-process-region "uncompface" delete (t nil) 0 "/* Format_version=1, Width=48, Height=48, Depth=1, Valid_bits_per_item=16 */\n" "icontopbm" (t nil) buffer-string] 6 (#$ . 409)]) (provide 'compface) Save