(FILECREATED "18-Nov-86 17:25:20" {QV}<NOTECARDS>1.3K>NEXT>RHTPATCH160.;2
 1920   

      changes to:  (VARS RHTPATCH160COMS)

      previous date: "18-Nov-86 15:54:36" {QV}<NOTECARDS>1.3K>NEXT>RHTPATCH160.;1)


(* Copyright (c) 1986 by Xerox Corporation. All rights reserved.)

(PRETTYCOMPRINT RHTPATCH160COMS)

(RPAQQ RHTPATCH160COMS
 ((* * rht 11/18/86: Fixes session parameters DefaultLinkIconxxx so that 
			     cards are NOT immediately updated. Also changes default setting for the 
			     ShowNoteFileOnCards session parameter.)
			  (* * Changes to NCPARAMETERS)
			  (* * Changed fn in NCPARAMETERS)
			  (FNS NC.DefaultLinkIconParametersSelectionFn)
			  (* * Replace the INITVARS for NC.ShowNoteFileOnCards with following)
			  (INITVARS (NC.ShowNoteFileOnCards T))))
(* * rht 11/18/86: Fixes session parameters DefaultLinkIconxxx so that cards are NOT 
immediately updated. Also changes default setting for the ShowNoteFileOnCards session 
parameter.)


(* * Changes to NCPARAMETERS)


(* * Changed fn in NCPARAMETERS)


(DEFINEQ

(NC.DefaultLinkIconParametersSelectionFn

  (LAMBDA (GlobalVar)                                        (* rht: "18-Nov-86 15:23")


          (* * Toggle setting of parameter and then update every card on the screen.)




          (* * fgh 6/5/86 First created.)




          (* * rht 11/18/86: Commented out the clearing of all link icon caches. This functionality should be made available 

	  somewhere else than the session params window.)



    (
PROG1
 (
COND

	       ((
EVAL
 GlobalVar)
		 (
SET
 GlobalVar NIL))
	       (T (
SET
 GlobalVar T)))                      (* NC.ClearAllLinkIconImageBoxCaches)

	     )))
)
(* * Replace the INITVARS for NC.ShowNoteFileOnCards with following)



(RPAQ? NC.ShowNoteFileOnCards
 T)
(PUTPROPS RHTPATCH160 COPYRIGHT ("Xerox Corporation" 1986))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (1056 1725 (NC.DefaultLinkIconParametersSelectionFn 1066 . 1723)))))
STOP