home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Usenet 1994 October
/
usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso
/
misc
/
volume23
/
psutils
/
patch01
next >
Wrap
Text File
|
1991-09-23
|
3KB
|
137 lines
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.