From:	CRDGW2::CRDGW2::MRGATE::"SMTP::PREP.AI.MIT.EDU::HELP-GNU-EMACS-REQUEST" 25-JUN-1991 07:58:09.36
To:	ARISIA::EVERHART
CC:	
Subj:	Re: Solution to printing the Elisp Reference Manual

From:	help-gnu-emacs-request@prep.ai.mit.edu@SMTP@CRDGW2
To:	Everhart@Arisia@MRGATE

Received:  by crdgw1.ge.com (5.57/GE 1.101)
	 id AA12762; Tue, 25 Jun 91 07:45:01 EDT
Received: by life.ai.mit.edu (4.1/AI-4.10) id AA06658; Tue, 25 Jun 91 05:24:59 EDT
Return-Path: <help-gnu-emacs-request@prep.ai.mit.edu>
Received: from tut.cis.ohio-state.edu by life.ai.mit.edu (4.1/AI-4.10) id AA06648; Tue, 25 Jun 91 05:24:35 EDT
Received: by tut.cis.ohio-state.edu (5.61-kk/5.910620)
	id AA12676; Tue, 25 Jun 91 05:23:44 -0400
Received: from USENET by tut.cis.ohio-state.edu with netnews
	for help-gnu-emacs@prep.ai.mit.edu (help-gnu-emacs@prep.ai.mit.edu)
	(contact usenet@tut.cis.ohio-state.edu if you have questions)
Date: 25 Jun 91 06:36:00 GMT
From: nntp-read!jc@bu.edu  (James Cameron)
Organization: What do you mean 'That *can't* be done????'
Subject: Re: Solution to printing the Elisp Reference Manual
Message-Id: <JC.91Jun25023600@raven.bu.edu>
References: <JC.91Jun25021821@raven.bu.edu>
Sender: help-gnu-emacs-request@prep.ai.mit.edu
To: help-gnu-emacs@prep.ai.mit.edu


Sorry yall, I made a typo I missed....I put 240 instead of 540 as
the last lines...so, here is the new one...

-----CUT HERE-----
#! /bin/csh -f

#  This shell script simply takes the formated elisp.dvi 
#  created from the GnuEmacs Reference Manual Makefile and
#  prints it 20 pages at a time using dvi2ps (which is 
#  available at your nearest ftp site or find it by 
#  telneting to quiche.cs.mcgill.ca, logging in as archie,
#  and do a "prog dvi2ps"

#  This is not a strongly written script but it solves the problem
#  with postscript printers trying to print out a HUGE dvi file like
#  this one.  

#  This is freely given software and you are welcome to make modifications
#  so long as all modifications are commented in by who made them and
#  follow the example shown. 

#  This program follows under the GNU GENERAL PUBLIC LICENSE.

#  Created by:  James Cameron
#          on: Tue Jun 25 01:50:37 EDT 1991

#  Modified by: James Cameron
#           on: Tue Jun 25 02:32:53 EDT 1991
#  Changes:  Fixed it so that it prints to 540+ instead of 240+ (which
#            was a typo.
#            Decreased the number of times it asks to change paper from
#            every 60 pages to 100.


echo ""
echo "Print GnuEmacs Elisp Reference Manual"
echo ""
echo -n "Please fill paper tray and then hit [enter]: "
set ENTER = $<
echo ""
 
set START_PAGE = 1
set END_START_PAGE = 540
set COUNT = 0

while ($START_PAGE < $END_START_PAGE)
  @ END_PAGE = $START_PAGE + 19
  echo "Starting - $START_PAGE  Ending - $END_PAGE"
  dvi2ps -r -f "$START_PAGE" -t "$END_PAGE" elisp.dvi | lpr
  @ START_PAGE = $START_PAGE + 20
  @ COUNT++
  if ($COUNT == 5) then
     echo ""
     echo -n "Please add more paper and then hit enter: "
     set ENTER = $<
     echo ""
     set COUNT = 0
  endif

end

echo "Starting - $START_PAGE  Ending - Whenever it does....*8-)"
dvi2ps -r -f "$START_PAGE" elisp.dvi | lpr

-----CUT HERE-----

jc

--
					-- James Cameron  (jc@raven.bu.edu)

Signal Processing and Interpretation Lab.  Boston, Mass  (617) 353-2879
------------------------------------------------------------------------------
"But to risk we must, for the greatest hazard in life is to risk nothing.  For
the man or woman who risks nothing, has nothing, does nothing, is nothing."
	(Quote from the eulogy for the late Christa McAuliffe.)
