2002-09-13 #

 (setq mew-print-command-format "a2ps")
     (defun mew-print-region (begin end)
       (interactive "r")
       (shell-command-on-region begin end mew-print-command-format))
 
     (defun mew-print-buffer ()
       (interactive)
       (mew-print-region (point-min) (point-max)))
 
     (setq mew-print-function (function mew-print-buffer))