$ od -c -N 50000 [phylum]<LISP>KOTO>Patches>LOCAL-KOTO-PATCHES.DCOM!2
0000000 ( F I L E C R E A T E D " 2 5
0000020 - F e b - 8 8 2 2 : 3 8 : 4 8
0000040 " ( " c o m p i l e d o n
0000060 " { P H Y L U M } < L I S P >
0000100 K O T O > P A T C H E S > L O C
0000120 A L - K O T O - P A T C H E S .
0000140 ; 2 ) \r " 1 2 - N o v - 8 5
0000160 1 4 : 5 9 : 2 3 " t c o m p l
0000200 ' d i n " I N T E R L I S P
0000220 - D 8 - S e p - 8 7 . . .
0000240 " d a t e d " 8 - S e p -
0000260 8 7 1 9 : 1 3 : 0 9 " ) \r ( F
0000300 I L E C R E A T E D " 2 5 - F
0000320 e b - 8 8 2 2 : 3 7 : 3 9 "
0000340 { P H Y L U M } < L I S P > K O
0000360 T O > P A T C H E S > L O C A L
0000400 - K O T O - P A T C H E S . ; 2
0000420 4 5 4 3 c h a n g e s t o
0000440 : ( \r V A R S L O C A L - K
0000460 O T O - P A T C H E S C O M S )
0000500 p r e v i o u s d a t e :
0000520 " 1 5 - J a n - 8 8 1 2 : 5 2
0000540 : 2 8 " \r { P H Y L U M } < L
0000560 I S P > K O T O > P A T C H E S
0000600 > L O C A L - K O T O - P A T C
0000620 H E S . ; 1 ) \r N E W \ I D L E
0000640 R A 0 0 0 1 D 1 \r ( N A M E
0000660 E R R O R S E T F 0 R E S
0000700 E T Y ) \0 \r \0 001 002 \0 ` \0 \0 i d
0000720 \v \0 \0 c \0 i 020 \0 ( 7 O B T A I
0000740 N . M O N I T O R L O C K ) \r (
0000760 2 \ G E T P A S S W O R D . L
0001000 O C K ) \r ( ) \r N E W \ I D L E
0001020 R D 1 \r ( P 2 R E S E T Z
0001040 P 1 R E S E T Y P 0
0001060 L I S P X H I S T I 0 F R
0001100 O M T I M E O U T F 3 L I
0001120 S P X H I S T F 4 R E S E
0001140 T V A R S L S T ) \0 * 003 002 \0 001
0001160 S 021 ! 002 T o \0 \0 \0 g \0 \0 \n \0 \0 221
0001200 h 202 g \0 \0 Z \n \0 \0 277 J 223 \b \0 \0 200
0001220 I 022 264 006 @ \t \0 \0 020 \0 ( 4 7 Q O
0001240 L D \ I D L E R 3 6 Q E R R
0001260 O R ! 3 0 Q R E S E T R E S
0001300 T O R E 1 6 Q N E W \ I D L
0001320 E R A 0 0 0 1 ) \r ( 2 4 Q E R
0001340 R O R 1 3 Q I N T E R N A L
0001360 ) \r ( 1 0 Q ( N E W \ I D L
0001400 E R A 0 0 0 1 ) ) \r N E W \ N S
0001420 . S E T T I M E D 1 \r ( I 0
0001440 R E T F L G ) \0 \f \0 \0 \0 001 @
0001460 \t \0 \0 n 001 / 027 \0 \0 020 \0 ( 3 O L
0001500 D \ N S . S E T T I M E ) \r ( 1
0001520 1 Q \ E n d D S T ) \r ( ) \r N
0001540 E W \ P U P . S E T T I M E D
0001560 1 \r ( I 0 R E T F L G ) \0
0001600 \f \0 \0 \0 001 @ \t \0 \0 n 001 / 027 \0 \0 020
0001620 \0 ( 3 O L D \ P U P . S E T T
0001640 I M E ) \r ( 1 1 Q \ E n d D S
0001660 T ) \r ( ) \r ( P R E T T Y C O M
0001700 P R I N T L O C A L - K O T O
0001720 - P A T C H E S C O M S ) \r ( R
0001740 P A Q Q L O C A L - K O T O -
0001760 P A T C H E S C O M S ( ( C O
0002000 M S ( * ; ; " f u n c t i
0002020 o n s a s s o c i a t e d w
0002040 i t h p a t c h e s " ) ( F
0002060 N S N E W \ I D L E R ) ( F
0002100 N S \r N E W \ N S . S E T T I
0002120 M E N E W \ P U P . S E T T I
0002140 M E ) ( M A C R O S W I T H
0002160 O U T . P A G E H O L D ) ) (
0002200 D E C L A R E : D O N T E V A
0002220 L @ L O A D D O C O P Y ( C
0002240 O M S ( * ; ; \r " p a t c
0002260 h i d l e r s o t h a t
0002300 i t c a n ' t s t a r t d
0002320 u r i n g i / o w a i t f
0002340 o r p a s s w o r d " ) ( P
0002360 ( M O V D ? ( Q U O T E \
0002400 I D L E R ) ( Q U O T E \r O
0002420 L D \ I D L E R ) ) ) ( P (
0002440 M O V D ( Q U O T E N E W \
0002460 I D L E R ) ( Q U O T E \ I
0002500 D L E R ) ) ) ) ( C O M S (
0002520 * ; ; \r " p a t c h 1 1 8
0002540 6 e t h e r h a n d l i n g
0002560 t o m a k e m p c o d e s
0002600 t e l e r a i d a b l e w h
0002620 e r e t h e y w e r e n o
0002640 t b e f o r e . " ) ( *
0002660 ; ; \r " M a s i n t e r ,
0002700 1 4 - O c t - 8 6 " ) ( P (
0002720 C H A N G E N A M E ( Q U O T
0002740 E \ D o v e E t h e r . T u r
0002760 n O n ) ( Q U O T E B L O C
0003000 K ) ( Q U O T E N I L L ) )
0003020 ( \ L O C K F N ( \r Q U O T
0003040 E N I L L ) ) ) ) ( C O M S
0003060 ( * T h e f o l l o w i n
0003100 g f i x e s t h e D S T
0003120 p r o b l e m . ) ( P ( M O
0003140 V D ? ( Q U O T E \ N S . S
0003160 E T T I M E ) ( Q U O T E \r
0003200 O L D \ N S . S E T T I M E ) )
0003220 ( M O V D ( Q U O T E N E
0003240 W \ N S . S E T T I M E ) ( Q
0003260 U O T E \ N S . S E T T I M E
0003300 ) N I L T ) ( M O V D ?
0003320 ( Q U O T E \ P U P . S E T T
0003340 I M E ) ( \r Q U O T E O L D
0003360 \ P U P . S E T T I M E ) ) (
0003400 M O V D ( Q U O T E N E W \
0003420 P U P . S E T T I M E ) ( Q U
0003440 O T E \ P U P . S E T T I M E
0003460 ) N I L T ) ( S A V E S E
0003500 T ( Q U O T E \r \ E n d D S
0003520 T ) 3 0 3 T ) ) ) ) ( D E
0003540 C L A R E : D O N T E V A L @
0003560 L O A D D O C O P Y ( P (
0003600 W I T H O U T . P A G E H O L D
0003620 ( W F R O M D S ( G E T S T
0003640 R E A M T ( Q U O T E \r O
0003660 U T P U T ) ) ) ( i f ( D E
0003700 F I N E D P ( Q U O T E T E
0003720 D I T ) ) t h e n ( F I L E
0003740 S L O A D ( S Y S L O A D )
0003760 T E D I T - C L O S E - O N - S
0004000 H R I N K ) ) ( F I L E S L O
0004020 A D ( \r S Y S L O A D ) C O
0004040 R R E C T T O L E R A N C E - P
0004060 A T C H P A T C H - L A R G E
0004100 I P B I T M A P P A T C H - T
0004120 W O S I D E D T E D I T - C L
0004140 O S E - O N - S H R I N K \r C
0004160 O R R E C T T O L E R A N C E -
0004200 P A T C H F A S T E D I T B M
0004220 ) ) ) ) ) ) \r ( D E F M A C R O
0004240 W I T H O U T . P A G E H O L
0004260 D ( W I N D O W & B O D Y
0004300 F O R M S ) ( B Q U O T E (
0004320 R E S E T L S T ( L E T * (
0004340 ( T T Y W I N D O W , W I N
0004360 D O W ) ( \r O R I G I N A L .
0004400 P A G E F U L L F N ( W I N D
0004420 O W P R O P T T Y W I N D O W
0004440 ( Q U O T E P A G E F U L L
0004460 F N ) ) ) ( N E W . P A G E F
0004500 U L L F N ( F U N C T I O N
0004520 N I L L ) ) ) ( \r R E S E T S
0004540 A V E ( W I N D O W P R O P
0004560 T T Y W I N D O W ( Q U O T E
0004600 P A G E F U L L F N ) N E W
0004620 . P A G E F U L L F N ) ( L I
0004640 S T ( F U N C T I O N ( L A
0004660 M B D A ( T T Y W I N D O W
0004700 \r N E W . P A G E F U L L F N
0004720 O R I G I N A L . P A G E F U L
0004740 L F N ) ( C O N D ( ( E Q
0004760 ( W I N D O W P R O P T T Y W
0005000 I N D O W ( Q U O T E P A G
0005020 E F U L L F N ) ) \r N E W . P
0005040 A G E F U L L F N ) ( W I N D
0005060 O W P R O P T T Y W I N D O W
0005100 ( Q U O T E P A G E F U L L
0005120 F N ) O R I G I N A L . P A G
0005140 E F U L L F N ) ) ) ) ) T T Y
0005160 W I N D O W \r N E W . P A G E
0005200 F U L L F N O R I G I N A L .
0005220 P A G E F U L L F N ) ) ) , @
0005240 F O R M S ) ) ) \r ( M O V D ?
0005260 ( Q U O T E \ I D L E R )
0005300 ( Q U O T E O L D \ I D L E R
0005320 ) ) \r ( M O V D ( Q U O T E
0005340 N E W \ I D L E R ) ( Q U O T
0005360 E \ I D L E R ) ) \r ( C H A N
0005400 G E N A M E ( Q U O T E \ D
0005420 o v e E t h e r . T u r n O n )
0005440 ( Q U O T E B L O C K ) (
0005460 Q U O T E N I L L ) ) \r ( \ L
0005500 O C K F N ( Q U O T E N I L
0005520 L ) ) \r ( M O V D ? ( Q U O T
0005540 E \ N S . S E T T I M E ) (
0005560 Q U O T E O L D \ N S . S E T
0005600 T I M E ) ) \r ( M O V D ( Q U
0005620 O T E N E W \ N S . S E T T I
0005640 M E ) ( Q U O T E \ N S . S
0005660 E T T I M E ) N I L T ) \r (
0005700 M O V D ? ( Q U O T E \ P U
0005720 P . S E T T I M E ) ( Q U O T
0005740 E O L D \ P U P . S E T T I M
0005760 E ) ) \r ( M O V D ( Q U O T E
0006000 N E W \ P U P . S E T T I M E
0006020 ) ( Q U O T E \ P U P . S E
0006040 T T I M E ) N I L T ) \r ( S
0006060 A V E S E T ( Q U O T E \ E
0006100 n d D S T ) 3 0 3 T ) \r ( W
0006120 I T H O U T . P A G E H O L D
0006140 ( W F R O M D S ( G E T S T R
0006160 E A M T ( Q U O T E O U T
0006200 P U T ) ) ) ( i f ( D E F I
0006220 N E D P ( Q U O T E T E D I
0006240 T ) ) t h e n ( F I L E S L
0006260 O A D \r ( S Y S L O A D ) T
0006300 E D I T - C L O S E - O N - S H
0006320 R I N K ) ) ( F I L E S L O A
0006340 D ( S Y S L O A D ) C O R R
0006360 E C T T O L E R A N C E - P A T
0006400 C H P A T C H - L A R G E I P
0006420 B I T M A P \r P A T C H - T W
0006440 O S I D E D T E D I T - C L O
0006460 S E - O N - S H R I N K C O R
0006500 R E C T T O L E R A N C E - P A
0006520 T C H F A S T E D I T B M ) )
0006540 \r ( P U T P R O P S L O C A L
0006560 - K O T O - P A T C H E S C O
0006600 P Y R I G H T ( " X e r o x
0006620 C o r p o r a t i o n " 1 9 8
0006640 8 ) ) \r N I L \r
0006650