comparison lisp/play/fortune.el @ 49598:0d8b17d428b5

Trailing whitepace deleted.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 04 Feb 2003 13:24:35 +0000
parents 2d351e49dc96
children 695cf19ef79e d7ddb3e565de
comparison
equal deleted inserted replaced
49597:e88404e8f2cf 49598:0d8b17d428b5
251 (message "Compiling new fortune database %s" fortune-dat) 251 (message "Compiling new fortune database %s" fortune-dat)
252 (shell-command 252 (shell-command
253 (concat fortune-strfile fortune-strfile-options 253 (concat fortune-strfile fortune-strfile-options
254 " " fortune-file fortune-quiet-strfile-options)))))) 254 " " fortune-file fortune-quiet-strfile-options))))))
255 (t (error "Can't compile fortune file %s" fortune-file))))) 255 (t (error "Can't compile fortune file %s" fortune-file)))))
256 256
257 257
258 ;;; ************** 258 ;;; **************
259 ;;; Use fortune for signature 259 ;;; Use fortune for signature
260 ;;;###autoload 260 ;;;###autoload
261 (defun fortune-to-signature (&optional file) 261 (defun fortune-to-signature (&optional file)
262 "Create signature from output of the fortune program. 262 "Create signature from output of the fortune program.