From c281728c655eab6b1b56381fb1b6fa988cd5cfa9 Mon Sep 17 00:00:00 2001 From: rmkaplan Date: Sun, 2 Jul 2023 18:25:41 -0700 Subject: [PATCH] PDFSTREAM: fix convert template --- library/PDFSTREAM | 17 ++++++++--------- library/PDFSTREAM.LCOM | Bin 5006 -> 4987 bytes 2 files changed, 8 insertions(+), 9 deletions(-) diff --git a/library/PDFSTREAM b/library/PDFSTREAM index 0e786e58..48291023 100644 --- a/library/PDFSTREAM +++ b/library/PDFSTREAM @@ -1,12 +1,10 @@ (DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) -(FILECREATED "25-Jun-2023 16:41:34" {WMEDLEY}PDFSTREAM.;36 12655 +(FILECREATED " 2-Jul-2023 17:00:18" {WMEDLEY}PDFSTREAM.;37 12671 :EDIT-BY rmk - :CHANGES-TO (FNS PDF-INIT) - - :PREVIOUS-DATE "24-Jun-2023 15:27:04" {WMEDLEY}PDFSTREAM.;35) + :PREVIOUS-DATE "25-Jun-2023 16:41:34" {WMEDLEY}PDFSTREAM.;36) (PRETTYCOMPRINT PDFSTREAMCOMS) @@ -105,8 +103,9 @@ (RPAQ? PDFCONVERTER 'ps2pdf) -(ADDTOVAR PDF-CONVERTER-TEMPLATES (ps2pdf " " PSTMPFILENAME " " PDFTMPFILENAME " 2> " ERRORFILE) - (pstopdf " " PSTMPFILENAME " -o " PDFTMPFILENAME " 2> " ERRORFILE)) +(ADDTOVAR PDF-CONVERTER-TEMPLATES (ps2pdf " " PSTMPFILENAME " " PDFTMPFILENAME " 2> " ERRORFILENAME) + (pstopdf " " PSTMPFILENAME " -o " PDFTMPFILENAME " 2> " + ERRORFILENAME)) (RPAQQ DEFAULTPRINTERTYPE PDF) (DECLARE%: DOEVAL@COMPILE DONTCOPY @@ -226,7 +225,7 @@ (PDF-INIT) (DECLARE%: DONTCOPY - (FILEMAP (NIL (2702 5036 (PDFFILEP 2712 . 3626) (PDF.HARDCOPYW 3628 . 4055) (PDF.TEXT 4057 . 4665) ( -PDF.TEDIT 4667 . 5034)) (5412 12616 (PDF-INIT 5422 . 6147) (OPEN-PDF-STREAM 6149 . 8252) ( -CLOSE-PDF-STREAM 8254 . 9169) (PDF-CONVERT 9171 . 12614))))) + (FILEMAP (NIL (2668 5002 (PDFFILEP 2678 . 3592) (PDF.HARDCOPYW 3594 . 4021) (PDF.TEXT 4023 . 4631) ( +PDF.TEDIT 4633 . 5000)) (5428 12632 (PDF-INIT 5438 . 6163) (OPEN-PDF-STREAM 6165 . 8268) ( +CLOSE-PDF-STREAM 8270 . 9185) (PDF-CONVERT 9187 . 12630))))) STOP diff --git a/library/PDFSTREAM.LCOM b/library/PDFSTREAM.LCOM index 8d53ee8000c9f69483c0df611aa1a0b6cde20b23..97a1344cf9b7705a55cb49e1c75d5e95e7d68cd7 100644 GIT binary patch delta 224 zcmeBE|E)G5TtvZ0*Q+!~*T}%gSi#WT%D}+N$arG5fs?tW0+*7JB~UUCB57o7WoTw) zVy>i+RFs;WpIeZblbWKCT2W9`tZJo@mtT^RnU}7RnWv!S7V6`pU}QP*u7m}Kep4eQ zO)d>LPajw3AXmo_R~H2(OcxkhOx9&oP&HRDG%_JKXtwzi00+*7J36i9#m4UI9p}CSm zQc-Gher`c#PHKumYDGa&v8t6qfQy^1r=MqtLS~+Vl8>9af|2ROyAsOCh8tQL0Fi}~ zCYOerr;n?1kgH>etBb