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

  1. Newsgroups: comp.sources.misc
  2. From: ajcd@dcs.ed.ac.uk (Angus Duggan)
  3. Subject:  v23i014:  psutils - Postscript document manipulation tools, Patch01
  4. Message-ID: <1991Sep24.024706.5577@sparky.imd.sterling.com>
  5. X-Md4-Signature: df2bcd8d9c1fd6098f000dc6dec45224
  6. Date: Tue, 24 Sep 1991 02:47:06 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: ajcd@dcs.ed.ac.uk (Angus Duggan)
  10. Posting-number: Volume 23, Issue 14
  11. Archive-name: psutils/patch01
  12. Environment: UNIX
  13. Patch-To: psutils: Volume 22, Issue 87-88
  14.  
  15. This is patch 1 for my PostScript document manipulation tools which were posted
  16. to c.s.m on 4th September. These are minor bug fixes.
  17.  
  18. Angus
  19. -----
  20. *** psnup.1.~1~    Fri Jul 12 10:34:42 1991
  21. --- psnup.1    Thu Sep  5 10:20:34 1991
  22. ***************
  23. *** 1,8 ****
  24.   .TH PSNUP 1
  25.   .SH NAME
  26. ! psnup \- select pages from a PostScript file
  27.   .SH SYNOPSIS
  28. ! .B pstops
  29.   [
  30.   .B \-q
  31.   ]
  32. --- 1,8 ----
  33.   .TH PSNUP 1
  34.   .SH NAME
  35. ! psnup \- uses pstops to merge multiple pages per sheet
  36.   .SH SYNOPSIS
  37. ! .B psnup
  38.   [
  39.   .B \-q
  40.   ]
  41. ***************
  42. *** 38,46 ****
  43.   .PP
  44.   The
  45.   .I \-w
  46. ! option gives the width, the default is (8.25in),
  47.   .I \-h
  48. ! option gives the height, the default is (11.75in), 
  49.   and are normally specified in
  50.   .B "cm"
  51.   or
  52. --- 38,46 ----
  53.   .PP
  54.   The
  55.   .I \-w
  56. ! option gives the width, the default is (21cm),
  57.   .I \-h
  58. ! option gives the height, the default is (29.7cm), 
  59.   and are normally specified in
  60.   .B "cm"
  61.   or
  62. *** psutil.c.~1~    Fri Jul 12 10:34:49 1991
  63. --- psutil.c    Thu Sep  5 10:16:57 1991
  64. ***************
  65. *** 7,13 ****
  66.   #include "psutil.h"
  67.   
  68.   #include <fcntl.h>
  69. - #include <ctype.h>
  70.   #include <string.h>
  71.   
  72.   static char buffer[BUFSIZ];
  73. --- 7,12 ----
  74. *** psutil.h.~1~    Fri Jul 12 10:34:50 1991
  75. --- psutil.h    Thu Sep  5 10:16:48 1991
  76. ***************
  77. *** 4,9 ****
  78. --- 4,10 ----
  79.    */
  80.   
  81.   #include <stdio.h>
  82. + #include <ctype.h>
  83.   
  84.   #ifndef LOCAL
  85.   #define LOCAL extern
  86. *** showchar.~1~    Tue Sep  3 10:38:02 1991
  87. --- showchar    Thu Sep  5 10:55:07 1991
  88. ***************
  89. *** 66,83 ****
  90.      dup fn /Metrics get exch get 
  91.      dup type /arraytype eq {
  92.         dup length 2 eq
  93. !       {1 get} {2 get} ifelse
  94. !    } if
  95.   } {
  96.      gsave
  97. !       fn setfont (\000) stringwidth pop round
  98.      grestore
  99.   } ifelse
  100.   gsave   % show width
  101.      thin setlinewidth
  102. !    dup reduction div 0 rlineto
  103.      gsave
  104. !       1 1 rmoveto 0 sc
  105.      grestore
  106.      -4 -3 rlineto 0 6 rmoveto 4 -3 rlineto
  107.      stroke
  108. --- 66,86 ----
  109.      dup fn /Metrics get exch get 
  110.      dup type /arraytype eq {
  111.         dup length 2 eq
  112. !       {1 get 0} {dup 2 get exch 3 get} ifelse
  113. !    } {
  114. !       round 0
  115. !    } ifelse
  116.   } {
  117.      gsave
  118. !       fn setfont (\000) stringwidth round exch round exch
  119.      grestore
  120.   } ifelse
  121.   gsave   % show width
  122.      thin setlinewidth
  123. !    2 copy
  124. !    reduction div exch reduction div exch rlineto
  125.      gsave
  126. !       1 1 rmoveto sc
  127.      grestore
  128.      -4 -3 rlineto 0 6 rmoveto 4 -3 rlineto
  129.      stroke
  130.  
  131. exit 0 # Just in case...
  132. -- 
  133. Kent Landfield                   INTERNET: kent@sparky.IMD.Sterling.COM
  134. Sterling Software, IMD           UUCP:     uunet!sparky!kent
  135. Phone:    (402) 291-8300         FAX:      (402) 291-4362
  136. Please send comp.sources.misc-related mail to kent@uunet.uu.net.
  137.