1
0
mirror of synced 2026-04-26 04:08:08 +00:00

Rmk8: Revised EDITINTERFACE, another attempt at SEDIT-TOPLEVEL (#619)

* EDITINTERFACE: further cleanup

* SEDIT:  Another attempt at adding a property interface
This commit is contained in:
rmkaplan
2021-12-11 21:45:29 -08:00
committed by GitHub
parent 40c10a7841
commit c2915bf5d3
10 changed files with 755 additions and 394 deletions

View File

@@ -1,12 +1,12 @@
(DEFINE-FILE-INFO PACKAGE (DEFPACKAGE SEDIT (USE LISP XCL)) READTABLE "XCL" BASE 10)
(IL:FILECREATED " 1-Dec-2021 17:38:50" 
IL:|{DSK}<Users>kaplan>Local>medley3.5>my-medley>sources>SEDIT-EXPORTS.;2| 2883
(IL:FILECREATED " 1-Dec-2021 20:41:41" 
IL:|{DSK}<Users>kaplan>Local>medley3.5>my-medley>sources>SEDIT-EXPORTS.;3| 2921
IL:|changes| IL:|to:| (IL:VARS IL:SEDIT-EXPORTSCOMS)
IL:|previous| IL:|date:| "17-May-90 11:01:36"
IL:|{DSK}<Users>kaplan>Local>medley3.5>my-medley>sources>SEDIT-EXPORTS.;1|)
IL:|previous| IL:|date:| " 1-Dec-2021 17:38:50"
IL:|{DSK}<Users>kaplan>Local>medley3.5>my-medley>sources>SEDIT-EXPORTS.;2|)
; Copyright (c) 1987-1988, 1990 by Venue & Xerox Corporation.
@@ -20,7 +20,7 @@ IL:|{DSK}<Users>kaplan>Local>medley3.5>my-medley>sources>SEDIT-EXPORTS.;1|)
(IL:* IL:|;;| "REGION MANAGER")
(IL:P (EXPORT '(GET-WINDOW-REGION SAVE-WINDOW-REGION GET-WINDOW))
(IL:P (EXPORT '(GET-WINDOW-REGION SAVE-WINDOW-REGION GET-WINDOW GET-PROP PUT-PROP))
(EXPORT '(KEEP-WINDOW-REGION)))
(IL:* IL:|;;| "PROGRAMMERS INTERFACE")
@@ -55,7 +55,7 @@ IL:|{DSK}<Users>kaplan>Local>medley3.5>my-medley>sources>SEDIT-EXPORTS.;1|)
(IL:* IL:|;;| "REGION MANAGER")
(EXPORT '(GET-WINDOW-REGION SAVE-WINDOW-REGION GET-WINDOW))
(EXPORT '(GET-WINDOW-REGION SAVE-WINDOW-REGION GET-WINDOW GET-PROP PUT-PROP))
(EXPORT '(KEEP-WINDOW-REGION))