[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Wed, 10 Oct 2001 10:40:03 -0400
I wrote a small function as follows:
(defun jbr-copy-reqion-and-print-scratch(start end)
"Erase *scratch*. Copy region to *scratch*. Print the buffer."
(let ((currbuff (current-buffer)))
(set-buffer (get-buffer-create "*scratch*"))
(insert-buffer-substring currbuff start end)
(global-set-key "\C-cj" 'jbr-copy-reqion-and-print-scratch)
Everything seems to work, but it won't print. I can switch to *scratch*,
and manually print it using nt-ps-print-buffer(), but not from within the
function. Should I be able to do this?
The function in print-NT.el is as follows:
(defun nt-ps-print-buffer ()
"Print buffer using postscript."
- [h-e-w] print-NT.el,
Jeff Rancier <=