home *** CD-ROM | disk | FTP | other *** search
- Newsgroups: comp.sources.misc
- From: ajcd@dcs.ed.ac.uk (Angus Duggan)
- Subject: v23i014: psutils - Postscript document manipulation tools, Patch01
- Message-ID: <1991Sep24.024706.5577@sparky.imd.sterling.com>
- X-Md4-Signature: df2bcd8d9c1fd6098f000dc6dec45224
- Date: Tue, 24 Sep 1991 02:47:06 GMT
- Approved: kent@sparky.imd.sterling.com
-
- Submitted-by: ajcd@dcs.ed.ac.uk (Angus Duggan)
- Posting-number: Volume 23, Issue 14
- Archive-name: psutils/patch01
- Environment: UNIX
- Patch-To: psutils: Volume 22, Issue 87-88
-
- This is patch 1 for my PostScript document manipulation tools which were posted
- to c.s.m on 4th September. These are minor bug fixes.
-
- Angus
- -----
- *** psnup.1.~1~ Fri Jul 12 10:34:42 1991
- --- psnup.1 Thu Sep 5 10:20:34 1991
- ***************
- *** 1,8 ****
- .TH PSNUP 1
- .SH NAME
- ! psnup \- select pages from a PostScript file
- .SH SYNOPSIS
- ! .B pstops
- [
- .B \-q
- ]
- --- 1,8 ----
- .TH PSNUP 1
- .SH NAME
- ! psnup \- uses pstops to merge multiple pages per sheet
- .SH SYNOPSIS
- ! .B psnup
- [
- .B \-q
- ]
- ***************
- *** 38,46 ****
- .PP
- The
- .I \-w
- ! option gives the width, the default is (8.25in),
- .I \-h
- ! option gives the height, the default is (11.75in),
- and are normally specified in
- .B "cm"
- or
- --- 38,46 ----
- .PP
- The
- .I \-w
- ! option gives the width, the default is (21cm),
- .I \-h
- ! option gives the height, the default is (29.7cm),
- and are normally specified in
- .B "cm"
- or
- *** psutil.c.~1~ Fri Jul 12 10:34:49 1991
- --- psutil.c Thu Sep 5 10:16:57 1991
- ***************
- *** 7,13 ****
- #include "psutil.h"
-
- #include <fcntl.h>
- - #include <ctype.h>
- #include <string.h>
-
- static char buffer[BUFSIZ];
- --- 7,12 ----
- *** psutil.h.~1~ Fri Jul 12 10:34:50 1991
- --- psutil.h Thu Sep 5 10:16:48 1991
- ***************
- *** 4,9 ****
- --- 4,10 ----
- */
-
- #include <stdio.h>
- + #include <ctype.h>
-
- #ifndef LOCAL
- #define LOCAL extern
- *** showchar.~1~ Tue Sep 3 10:38:02 1991
- --- showchar Thu Sep 5 10:55:07 1991
- ***************
- *** 66,83 ****
- dup fn /Metrics get exch get
- dup type /arraytype eq {
- dup length 2 eq
- ! {1 get} {2 get} ifelse
- ! } if
- } {
- gsave
- ! fn setfont (\000) stringwidth pop round
- grestore
- } ifelse
- gsave % show width
- thin setlinewidth
- ! dup reduction div 0 rlineto
- gsave
- ! 1 1 rmoveto 0 sc
- grestore
- -4 -3 rlineto 0 6 rmoveto 4 -3 rlineto
- stroke
- --- 66,86 ----
- dup fn /Metrics get exch get
- dup type /arraytype eq {
- dup length 2 eq
- ! {1 get 0} {dup 2 get exch 3 get} ifelse
- ! } {
- ! round 0
- ! } ifelse
- } {
- gsave
- ! fn setfont (\000) stringwidth round exch round exch
- grestore
- } ifelse
- gsave % show width
- thin setlinewidth
- ! 2 copy
- ! reduction div exch reduction div exch rlineto
- gsave
- ! 1 1 rmoveto sc
- grestore
- -4 -3 rlineto 0 6 rmoveto 4 -3 rlineto
- stroke
-
- exit 0 # Just in case...
- --
- Kent Landfield INTERNET: kent@sparky.IMD.Sterling.COM
- Sterling Software, IMD UUCP: uunet!sparky!kent
- Phone: (402) 291-8300 FAX: (402) 291-4362
- Please send comp.sources.misc-related mail to kent@uunet.uu.net.
-