Remove DEFAULTPRINTINGHOST from APUTDQ
No need to smash the values created during the loadup
This commit is contained in:
parent
1fc6e5115c
commit
d2f08479aa
@ -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
|
||||
|
||||
Binary file not shown.
Loading…
x
Reference in New Issue
Block a user