;;; -*- Mode: Common-Lisp; Package:User; Base:10.; Patch-File:T -*-
;;; Patch directory for TV version 6
;;; Written 06/25/90 18:26:27 by MARKY,
;;; while running on LIBRA from band LODA
;;; With SYSTEM 6.41, VIRTUAL-MEMORY 6.3, EH 6.8, MAKE-SYSTEM 6.5, MICRONET 6.0, LOCAL-FILE 6.2,
;;;  BASIC-PATHNAME 6.5, NETWORK-SUPPORT-COLD 6.2, BASIC-NAMESPACE 6.8, NETWORK-NAMESPACE 6.1,
;;;  DISK-IO 6.4, DISK-LABEL 6.1, BASIC-FILE 6.13, MAC-PATHNAME 6.0, NETWORK-PATHNAME 6.2,
;;;  COMPILER 6.18, TV 6.31, DATALINK 6.0, CHAOSNET 6.8, GC 6.4, MEMORY-AUX 6.0, NVRAM 6.4,
;;;  SYSLOG 6.2, STREAMER-TAPE 6.6, UCL 6.1, INPUT-EDITOR 6.1, METER 6.2, ZWEI 6.27,
;;;  DEBUG-TOOLS 6.5, NETWORK-SUPPORT 6.1, NETWORK-SERVICE 6.3, DATALINK-DISPLAYS 6.0,
;;;  FONT-EDITOR 6.1, SERIAL 6.0, PRINTER 6.8, MAC-PRINTER-TYPES 6.2, PRINTER-TYPES 6.2,
;;;  IMAGEN 6.1, SUGGESTIONS 6.1, MAIL-DAEMON 6.6, MAIL-READER 6.9, TELNET 6.1, VT100 6.0,
;;;  NAMESPACE-EDITOR 6.6, PROFILE 6.3, VISIDOC 6.7, TI-CLOS 6.53, CLEH 6.5, IP 3.65,
;;;  Experimental BUG 11.19, Experimental CLX 7.1, X11M 6.32, Experimental CLUE 10.0,
;;;  Experimental CLIO 1.0,  microcode 483, Band Name: Rel 6.1 *b +SLE 6/18

(:PATCH-SYSTEM-NAME "TV" :MAJOR-VERSION 6 :LATEST-MINOR-VERSION 32)

(:RELEASED
((0 "TV Loaded" "BUILD" NIL)
  (1 "Fixed  CHOOSE-VARIABLE-VALUES-RUBOUT-HANDLER-FUNCTION to handle line that extend past the window boundary. It was writing over itself." "BERGER" NIL)
  (2 "Changed sheet-string-length to allow font descriptors, changed
(sheet :string-out-explicit) to provide default args, and also
changed sheet-string-out-explicit-1 to continue output until
XLIM *AND* YLIM have beed reached for multiline strings." "marky" NIL)
  (3 "Changes to BASIC-CHOOSE-VARIABLE-VALUES :print-item and
:who-line-documentation-string to handle mouse doc on 
continuation lines properly." "marky" NIL)
  (4 "Changed :new-window, :pan, :set-scales, :after :set-transform & :zoom methods
in w:graphics-mixin to use EQUALP instead of EQUAL which is never true for
different arrays since EQUAL is really EQ for arrays." "MARKY" NIL)
  (5 "W:graphic-mixin changes to correct several bugs and allow user to 
determine whether or not rectangles are drawn as usual or 1-pixel
less if scaling factors are 1:1. See w:*adjust-rectangles* ." "MARKY" NIL)
  (6 "Corrected color to gray-scale mapping in :draw-point
method of w:graphic-mixin." "MARKY" NIL)
  (7 "Make mouse-warp a complete no-op on an mX.  In hysteretic-window-mixin's 
:handle-mouse method, use unglitched mouse position only on mmon systems, use
mouse-x/mouse-y on mX and single-monitor Explorers.  Fixes SPRs 9909, 9910,
9959, 9961, and 9985." "GRENINGER" NIL)
  (8 "Changes to dual-monitor code to correct run-bar bugs and 
garbage collect killed screens and miscellaneous changes." "marky" NIL)
  (9 "No longer leave images of the scroll bar outline of a Mac-style scroll bar on the
screen everytime the scroll region is refreshed while the user is dragging the 
scroll bar." "GRENINGER" NIL)
  (10 "Added code to prevent changing the blinker-offset instance 
variable while on the screen leaving \"ghost\" blinkers. " "marky" NIL)
  (11 "Changed tv:find-window to understand objects returned from TYPE-OF
when it used to always expect a symbol." "MARKY" NIL)
  (12 "Set a newly created window's window-id slot to T in (sheet :init) iff it is NIL.
[SPR 10156]" "GRENINGER" NIL)
  (13 "Protect all calls on mX (send-xxx ...) routines by wrapping them within either
without-interrupts (blinkers) or prepare-sheet (everything else).  This should 
ensure that inhibit-scheduling-flag is always T when we bind add:*no-interrupt*
before sending a drawing command to the Mac, resulting in much improved stability.
[SPR 10194]" "GRENINGER" NIL)
  (14 "Added without-interrupts around copy-array-portion in WHO-LINE-RUN-STATE-UPDATE to make sure strings do not change out from under us." "BERGER" NIL)
  (15 "Insure in (tv:sheet :deexpose) that a window with
its temporary-bit-array T is not accessed as an array." "MARKY" NIL)
  (16 "Refresh of suggestions-off-frame when (mmon-p) for cold-boot.
See also suggestions patch 6.1 for warm-boot refresh.
Also fixed other minor problems with tv:initial-lisp-listener." "marky" NIL)
  (17 "Part of patches required to be able to boot disk-saved MMON
band to another hardware configuration. To be effective you
must also load SYSTEM and MMON patches. Also contains misc
patches for obscure problems." "marky" NIL)
  (18 "Changes to window LABELS to correct problems with
border widths and label drawing with fonts and
with border-margin-widths." "marky" NIL)
  (19 "Changes to expose-initial-screens for (mmon-p) disk-saves
to jump-start (:method tv:standard-screen :around :expose)" "marky" NIL)
  (20 "Changes to make :draw-string-up (:draw-string-down) work for w:graphics-mixin
and for windows with margins." "MARKY" NIL)
  (21 "Change to sheet-line-out to check for reaching the right margin on a non-graphic char.
This fixes the problem in ZMACS with extra tabs at end of the line causing a same-line
line-wrap instead of a line-wrap to the next line." "MARKY" NIL)
  (22 "Change to tv:show-font-map. Used a macro before defined in build." "MARKY" NIL)
  (23 "Change to mouse-confirm to allow NIL for WINDOW-MAX-WIDTH as advertised." "MARKY" NIL)
  (24 "Change to w:choose-variable-values to prevent hang in \"choose\"
state. Also change to prevent leaving window on screen in rare situations
(on MX during paging) where w:selected-window changes between calls
to deactivate the CVV and to set the underlying windows selection-substitute." "MARKY" NIL)
  (25 "Changed SHEET-STRING-OUT-EXPLICIT-1 to return INDEX as the final-index
value instead of END. END is the index of the last char in the string
which is NOT the last char printed." "MARKY" NIL)
  (26 "When exposing a deexposed mX screen be sure the width of the old-screen-array
created matches the width of the screen's buffer array." "GRENINGER" NIL)
  (27 "Fixed the checker function for defwindow resources when the keyboard
and mouse pointed to different screens." "MARKY" NIL)
  (28 "Prevent a menu created by w:menu-choose that is :pop-up nil 
and :permanent nil from hanging around forever." "MARKY" NIL)
  (29 "Make sure the mouse-sheet's width & height are non-null before
trying to glitch the mouse.  Prevents mX screen-resizing from
going to cold-load stream complaining about a bad arg to \">\"." "GRENINGER" NIL)
  (30 "Changes to cover 3-pixel high strip between who line doc 
window and who line status line for MMON-p systems." "marky" NIL)
  (31 "moved x11 system's re-definition of tv:mouse-input to window
system mouse file. This corrects window patch 6.29 which
removed the x-enabled hook in tv:mouse-input and made the
mouse on an X-window very slow and sluggish." "MARKY" NIL)
  (32 "Changed choose-variable-values to compute OLD-SUBSTITUTE from CURRENT-WINDOW
not SUPERIOR." "MARKY" NIL)
  ))