;;; -*- Mode: Common-Lisp; Package:User; Base:10.; Patch-File:T -*- ;;; Patch directory for CLUE version 6 ;;; Written 05/17/90 16:21:43 by KK, ;;; while running on RIGI from band PB28 ;;; With SYSTEM 6.31, GC 6.3, VIRTUAL-MEMORY 6.3, MICRONET 6.0, MICRONET-COMM 6.3, ;;; DISK-IO 6.3, DISK-LABEL 6.0, BASIC-PATHNAME 6.4, MAC-PATHNAME 6.0, NETWORK-SUPPORT-COLD 6.2, ;;; BASIC-NAMESPACE 6.7, BASIC-FILE 6.10, RPC 6.2, NFS-MX 6.7, EH 6.7, MAKE-SYSTEM 6.3, ;;; MEMORY-AUX 6.0, COMPILER 6.14, TV 6.24, NVRAM 6.2, UCL 6.0, INPUT-EDITOR 6.0, ;;; MACTOOLBOX 2.17, METER 6.1, ZWEI 6.14, DEBUG-TOOLS 6.4, WINDOW-MX 6.10, PRINTER 6.4, ;;; MAC-PRINTER-TYPES 6.2, CLIPBOARD 6.1, TI-CLOS 6.44, CLEH 6.5, NETWORK-PATHNAME 6.2, ;;; NETWORK-NAMESPACE 6.1, DATALINK 6.0, CHAOSNET 6.6, NETWORK-SUPPORT 6.1, NETWORK-SERVICE 6.2, ;;; DATALINK-DISPLAYS 6.0, MX-DATALINK 6.1, NAMESPACE-EDITOR 6.4, IP 3.62, NFS-MX-SERVER 6.0, ;;; MX-SERIAL 6.1, PRINTER-TYPES 6.2, IMAGEN 6.1, MAIL-DAEMON 6.6, MAIL-READER 6.8, ;;; TELNET 6.1, VT100 6.0, STREAMER-TAPE 6.5, DECNET 1.72, VISIDOC 6.7, PROFILE 6.3, ;;; Experimental CLX 6.11, CLUE 6.102, Experimental BUG 11.19, Experimental SC 3.0, ;;; Experimental CLIO 25.0, microcode 139, Band Name: microExplorer Network + SLE (11/28) (:PATCH-SYSTEM-NAME "CLUE" :MAJOR-VERSION 6 :LATEST-MINOR-VERSION 104) (:RELEASED ((0 "CLUE Loaded" "BUILD" NIL) (1 "handle-event: Change basic-contact and shell methods to specialize on event argument. This makes slot-value references to the event more efficient." "KK" NIL) (2 "dispatch-event: remove compression of :enter/leave-notify events." "KK" NIL) (3 ": Fix to check for no content child." "KK" NIL) (4 "Export initialize-geometry in CLUEI and CLUE packages." "KK" NIL) (5 "convert: Change references to *bitmap-images* to use CLUEI package." "KK" NIL) (6 "Change default pathname for demo directory (*clue-demo-directory*)." "KK" NIL) (7 "interactive-stream: fix CLOS problem by reloading defcontact form after compiling with CLOS 6.12." "KK" NIL) (8 "Intern interactive-stream and related functions in CLUEI package." "KK" NIL) (9 "Recompile convert methods with CLOS 6.11 or greater in order to avoid \"convert bug\"." "KK" NIL) (10 "Undefine the old handle-event :before method which was obsoleted by Patch 6.1." "KK" NIL) (11 "click-lookahead: correct typo in final case form used to exit double-click lookahead." "KK" NIL) (12 "motion/button/key-check: Fix bug so select defaults to :same. Fix encode-clue-modifier-mask to correctly encode state key lists. Clear up other minor bugs in check functions." "KK" NIL) (13 "using-gcontext: when modifiying existing cache member, remember to invalidate old server state." "KK" NIL) (14 "(setf wm-initial-state): Correct typo causing call to undefined function!" "KK" NIL) (15 "Ensure shell is realized before updating properties." "KK" NIL) (16 "1. (setf (contact-state shell) :iconic): Don't update initial-state hint if inside without-requests. 2. handle-event :before (shell): Don't setf contact-state if not responding to wm notification. " "KK" NIL) (17 "shells: Use new shell-mapped/unmapped functions to invoke :map/:unmap callbacks. Define primary preferred-size method for shell classes." "KK" NIL) (18 "handle-event (shell): Avoid unnecessary resize of content when :configure-notify signals only a change in top-level border-width. " "KK" NIL) (19 "process-all-events: Process remaining events correctly to avoid hangup resulting from event compression." "KK" NIL) (20 "find-gcontext: Ensure that when last cache element is modified, that it is correctly deleted from cache." "KK" NIL) (21 "change-priority: Use priority/sibling returned from manage-priority. Correctly test for managed-p. Avoid redundant priority change for top-level contact." "KK" NIL) (22 "root gmgmt: Process any pending :configure-notify before reconfiguring." "KK" NIL) (23 "initialize-instance, realize: Changed to allow :input-only contacts to be created." "KK" NIL) (24 "Modify special version of xlib:create-window used by CLUE to incorporate changes from patch CLX 6.5." "KK" NIL) (25 "define-contact-resources: Signal error if different slot and resource :initform's are given for a contact resource. This prevents a bug which caused steps #4 and #5 in resource initialization (see manual, sec 18.2.1) to be reversed." "KK" NIL) (26 "root, interactive-stream: defcontact forms changed to be compatible with new defcontact error checking added in patch 6.25. The set of root resources was also rationalized." "KK" NIL) (27 "dispatch-event: Change handling of exposure compression. Accumulate total exposed area from all exposures into the single exposure event reported." "KK" NIL) (28 "wm-shell: add defevent to handle :focus-in events." "KK" NIL) (29 "Added check/match functions for :timer events." "KK" NIL) (30 "using-gcontext: Wrap &body with unwind-protect." "KK" NIL) (31 "apply-callback: no longer binds special variable *contact*." "KK" NIL) (32 "define-contact-resources: Eliminate duplicate resource initialization when superclasses contain more than one contact subclass." "KK" NIL) (33 "destroy-cleanup, destroyed-p: don't set window-id to -1 because this causes stern compilers to complain." "KK" NIL) (34 "Make the following functions generic: add-event, delete-event, event-actions, initial-state-transition. Make change-priority call a new generic function (setf contact-priority) to actually reset window priority." "KK" NIL) (35 "class-all-superclasses: Enhanced to work for ordinary CLOS classes. " "KK" NIL) (36 "Many changes to interactive-stream." "MARKY" NIL) (37 "default-resources: Fix bug when contact arg is a string (SPR 10832)" "KK" NIL) (38 "destroy: Unmanage contact before destroying it, so that parent's change-layout will be called." "KK" NIL) (39 "resource: use (intern name 'keyword) to look up value on initialization slot." "KK" NIL) (40 "defcontact, initialize-instance: ensure that initialization slot contains converted values for all resources." "KK" NIL) (41 "Recompile/reload defcontact's for all CLUE classes to pick up changes from patch 6.40" "KK" NIL) (42 "Class precedence list cache used by event translation changed to avoid crashing on unfinalized class and to eliminate classes with no defevent's. defcontact and all base contact classes recompiled/reloaded." "KK" NIL) (43 "defcontact: fix bug interpreting :constraints specification." "ARELLANO" NIL) (44 "Fix bug introduced by patch 6.42 which caused a :mapped contact to not really get mapped. Reinstate slot writer methods that were accidentally lost when defcontact forms containing (incorrect) :accessor options were recompiled/reloaded." "KK" NIL) (45 "perform-callback: remove special binding of *contact*" "KK" NIL) (46 "contact-translate: add this new utility function." "KK" NIL) (47 "wm-group: Allow this to be a window object; convert to resource-id automatically." "KK" NIL) (48 "Many shell changes: wm-shell/top-level-shell setf methods for components of standard properties now return the new value. Unnecessary slots removed from top-level-shell; these correspond to icon attributes already being stored in the hints slot." "KK" NIL) (49 "wm-shell, top-level-shell: Add resource specifications and initialization. Rename initargs to use wm- prefix. Remove colormap initarg. top-level-session: Rename initargs to use sm- prefix." "KK" NIL) (50 "Miscellaneous fixes to INTERACTIVE-STREAM's rubout-handler." "MARKY" NIL) (51 "change-geometry: Accept trivially if parent not realized." "ARELLANO" NIL) (52 "New functions for managing cursor cache." "KK" NIL) (53 "while-changing-layout defined." "KK" NIL) (54 "Add shell-mapped :before method to ensure that an override-shell will be at the top of the stacking order when mapped." "KK" NIL) (55 "convert: convert image to cursor." "KK" NIL) (56 "change-geometry: call after-effect function returned by manage-geometry." "KK" NIL) (57 "manage-priority method for root parent: avoid hangup when changing priority of a shell." "KK" NIL) (58 "change-priority: Call after-effect function returned by manage-priority. Fix logic errors. change-geometry: Fix minor logic error." "KK" NIL) (59 "change-geometry: fix error in changing unrealized shell. manage-geometry: new :around method for composite ensures immediate approval if parent or child is unrealized." "KK" NIL) (60 "change-geometry: Perform after-effect of manage-geometry only if geometry really is changed." "KK" NIL) (61 "Add manage-geometry method to handle (parent root) (child override-shell) case." "KK" NIL) (62 "Before any shell is mapped set its priority to :above to guarantee the user can see it." "GRENINGER" NIL) (63 "Add (setf contact-callbacks) method to support with-confirm." "KK" NIL) (64 "defcontact: Ensure that class initialization methods are not defined if unnecessary." "KK" NIL) (65 "manage-geometry: Use :around method to ensure that requested shell changes are performed even if not realized." "KK" NIL) (66 "(setf contact-state): Ensure map-window occurs if initially :mapped, even if some siblings are :withdrawn. get-contact-resource-table: Print better error message when no :parent given to make-contact." "KK" NIL) (67 "Add new macro: apply-callback-else." "KK" NIL) (68 "initialize-geometry: When only 1 newly-managed child is found for a composite, pass it as the optional arg to change-layout." "KK" NIL) (69 "move/resize: add :around method on contact class that skips all primary/auxiliary methods when geometry not really changed." "KK" NIL) (70 "top-level-session: Add initialize-instance method to set default client-host. Add realize method to set initial property values." "KK" NIL) (71 "wm-shell: add initargs for non-resource hints (wm-group, wm-keyboard-input)" "KK" NIL) (72 "describe-resource: remove call to xlib:resource-key which is undefined in R4 CLX." "KK" NIL) (73 "wm-change-protocols: Convert atom keywords to id's when changing :wm_protocols property." "KK" NIL) (74 "change-geometry: Fix typo in last patch; return correct values." "ARELLANO" NIL) (75 "Add contact-top-level as exported function in CLUE." "KK" NIL) (76 "transient-shell: Ensure transient-for window is top-level." "KK" NIL) (77 "Handle :configure-notify events correctly for the root by fixing how the with-event-mode macro remembers the event actions it temporarily overrides." "GRENINGER" NIL) (78 "convert: use ignore-errors to avoid signalling error during value conversion." "KK" NIL) (79 "add-child: add new method to signal error if parent is a root and new child is not a shell." "KK" NIL) (80 "Fix (setf contact-state) for shells so that resulting :(un)map-notify's are ignored." "KK" NIL) (81 "Reposition (handle-event :before) and (setf contact-state) methods from shell class to wm-shell so that override-shell's don't execute them. " "KK" NIL) (82 "Use new method for computing an event mask from contact event translations. delete-event will no longer remove event mask bits set in a resource initform. Affects: add-event, delete-event, defevent, undefevent, defcontact." "KK" NIL) (83 "Define new (setf contact-state) method for shell class. This is the one used by override-shell." "KK" NIL) (84 "(set contact-state) for wm-shell: use internal-process-next-event to avoid infinite recursion on update-state." "KK" NIL) (85 "basic-contact: Change type of event-mask slot to mask32 and define convert method to convert event key lists. basic-contact, contact: Reconcile slots which need :reader in defcontact and separate setf functions." "KK" NIL) (86 "Add check/match functions to handle :property-notify event specification lists." "KK" NIL) (87 "1. Add new exported function: owns-focus-p 2. Add new refresh function (moved from CLIO) 3. (setf contact-sensitive): Uses refresh to update display. Uses owns-focus-p to give up focus when becoming insensitive. 4. accept-focus-p: Don't accept if insensitive. 5. *sensitive-events*: Allow :focus-out to be handled when insensitive." "KK" NIL) (88 "owns-focus-p: handle :pointer-root focus correctly." "KK" NIL) (89 "wm-take-focus, wm-shell method: Ignore focus-in if kind is :POINTER." "KK" NIL) (90 "dispatch-event: Speed up exposure compression; ensure count is zero in final exposure event. delete-before-action: Make this work!" "KK" NIL) (91 "(setf contact-background): convert color names to pixels." "KK" NIL) (92 "manage-geometry (root wm-shell): Replace process-all-events that was causing infinite recursion on update-state. Use internal-process-event instead." "KK" NIL) (93 "change-layout (shell): Use move to ensure content border is hidden." "pf" NIL) (94 "move/resize: with-state now used in each of these primary methods. This ensures that any ConfigureWindow request is sent before :after methods are invoked. " "KK" NIL) (95 "wm-take-focus: Enhance composite method to search for focus descendant." "KK" NIL) (96 "display-cursor: Change to use alist, not plist. Needed to lookup cursors associated with integer names." "KK" NIL) (97 "Export cursor name symbols." "KK" NIL) (98 "(un)defevent: Clear cached event precedence list, so it will be recomputed on demand to include new class event translations." "KK" NIL) (99 "Make shells inherit default background and colormap from owner, not parent." "KK" NIL) (100 "dispatch-event, internal-process-next-event: Add declarations for speed optimization." "KK" NIL) (101 "contact-constraint: Faster implementation." "KK" NIL) (102 "Add image pixmap cache functions." "KK" NIL) (103 "allocate-event: Optimized implementation for Explorer." "KK" NIL) (104 "do-convert, convert: Signal failure to convert correctly when type is supertype of null. Clean up convert method for type 'boolean." "KK" NIL) ))