1
0
mirror of synced 2026-05-02 14:31:05 +00:00

Hardcopy to printer (#2290)

* Separate interface for imagefile creation from the send-to-printer interface
* SEND.FILE.TO.PRINTER recognizes :DEFAULTPRINTER
* Various changes to address #2414
* Move BITMAP properties from PRINTERTYPES to PRINTFILETYPES.
* Fix ShellOpen, add UNIX-TMP-FILE-NAME
* Include COERCEFONTSPEC changes in anticipation of HTML streams
* PDFSTREAM compatible with new imagefile architecture plus able to convert non-local Postscript streams
* SKETCH compatible with new imagefile/printing architecture
* TEDIT compatible with new printing architecture
* Tedit files are of type TEDIT, not TEXT, new interface function TEDIT.TO.IMAGEFILE
* ATTACHEDWINDOW:  DOATTACHEDWINDOWCOM allows menu to have a form to EVAL, like the background menu
* WINDOW: fix menus for new hardcopy architecture
* Remove FLUSHFONTSINCORE--FLUSHFONTCACHE is more general
* LOAD character names as suggested in PR #2398
* HARDCOPYW respects file extension
* VIEWER as default printinghost
* SLASHIT interprets '.
* MCCS to UTF8 conversion on printer name
* Deal with {LPT}.LOCAL and upper casing
* @ LPT printers work with exact upper/lower matching
* Using NSPRINT functions to recognize fax
* Let "UNIX" be the name of the default printer of type UNIX
This commit is contained in:
rmkaplan
2026-01-26 15:38:22 -08:00
committed by GitHub
parent 23cef354eb
commit 65df2ba6a4
63 changed files with 3435 additions and 3177 deletions

View File

@@ -1,12 +1,12 @@
(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)
(FILECREATED "11-Jun-2025 08:43:36" {WMEDLEY}<sources>APUTDQ.;5 10433
(FILECREATED "28-Dec-2025 16:59:14" {WMEDLEY}<sources>APUTDQ.;6 10366
:EDIT-BY rmk
:CHANGES-TO (VARS APUTDQCOMS)
:PREVIOUS-DATE "23-May-2025 09:03:46" {WMEDLEY}<sources>APUTDQ.;4)
:PREVIOUS-DATE "11-Jun-2025 08:43:36" {WMEDLEY}<sources>APUTDQ.;5)
(PRETTYCOMPRINT APUTDQCOMS)
@@ -29,8 +29,8 @@
(LOGINHOST/DIR '{DSK}))
(FNS LOADUP ENDLOADUP)
(ALISTS (SYSTEMINITVARS \CONNECTED.DIRECTORY DWIMFLG ADDSPELLFLG FILEPKGFLG BUILDMAPFLG
UPDATEMAPFLG DEFAULTREGISTRY DEFAULTPRINTINGHOST NETWORKOSTYPES CH.NET.HINT
CH.DEFAULT.DOMAIN CH.DEFAULT.ORGANIZATION ADVISEDFNS))
UPDATEMAPFLG DEFAULTREGISTRY NETWORKOSTYPES CH.NET.HINT CH.DEFAULT.DOMAIN
CH.DEFAULT.ORGANIZATION ADVISEDFNS))
[DECLARE%: DONTEVAL@LOAD DOCOPY
(* ;; "many of these are obsolete and can be removed, but it is unclear which ones")
@@ -174,7 +174,6 @@
(BUILDMAPFLG . T)
(UPDATEMAPFLG . T)
(DEFAULTREGISTRY)
(DEFAULTPRINTINGHOST)
(NETWORKOSTYPES)
(CH.NET.HINT)
(CH.DEFAULT.DOMAIN)
@@ -249,7 +248,7 @@
(ADDTOVAR LAMA )
)
(DECLARE%: DONTCOPY
(FILEMAP (NIL (3701 5909 (GREETFILENAME 3711 . 5584) (FAULTEVAL 5586 . 5658) (FAULTAPPLY 5660 . 5746)
(ERRORX 5748 . 5814) (SET-DOCUMENTATION 5816 . 5907)) (5910 6930 (SMASHFILECOMS 5920 . 6262) (
SMASHFILECOMSLST 6264 . 6928)) (7024 8628 (LOADUP 7034 . 7618) (ENDLOADUP 7620 . 8626)))))
(FILEMAP (NIL (3681 5889 (GREETFILENAME 3691 . 5564) (FAULTEVAL 5566 . 5638) (FAULTAPPLY 5640 . 5726)
(ERRORX 5728 . 5794) (SET-DOCUMENTATION 5796 . 5887)) (5890 6910 (SMASHFILECOMS 5900 . 6242) (
SMASHFILECOMSLST 6244 . 6908)) (7004 8608 (LOADUP 7014 . 7598) (ENDLOADUP 7600 . 8606)))))
STOP