help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Printing fonts


From: Joel J. Adamson
Subject: Re: Printing fonts
Date: Thu, 18 Oct 2007 14:00:56 -0400
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/23.0.0 (gnu/linux)

address@hidden (Joel J. Adamson) writes:

[...]


> I only discovered enscript after writing my initial message.

Here's a little function to do the hard work, suggestions welcome:


(defun my-print-buffer (font)
  (interactive "sFont: ")
  (let ((cmd-string
         (format "enscript -u\"Joel J. Adamson\" --ul-font=Times-Roman100 
--ul-style=filled -f%s -G --style=a2ps" font))) ;include page title of current 
buffer
    (shell-command-on-region
     (point-min) (point-max) cmd-string)))

Can I split that string across lines?  The comment is really a TODO; I
tried inserting a page header like in a2ps, but "-b%s" corresponding
to (buffer-name (current-buffer)) didn't work.

Thanks,
Joel

-- 
Joel J. Adamson
Biostatistician
Pediatric Psychopharmacology Research Unit
Massachusetts General Hospital
Boston, MA  02114
(617) 643-1432
(303) 880-3109


reply via email to

[Prev in Thread] Current Thread [Next in Thread]