$ od -c -N 50000 [eris]<LispUsers>WAM.TED!3 0000000 * T i t l e : W A M ( W i 0000020 n d o w A c t i o n M e n u 0000040 ) \r * A u t h o r : J e f f 0000060 S h r a g e r \r * S u p p o 0000100 r t : J e f f S h r a g e r 0000120 ( S h r a g e r . P A @ X e r 0000140 o x ) \r \r * S o u r c e : { 0000160 E r i s } < L I S P U S E R S > 0000200 W A M . \r * D C o m : { E r 0000220 i s } < L I S P U S E R S > W A 0000240 M . D C O M \r * D o c : { E 0000260 r i s } < L I S P U S E R S > W 0000300 A M . T E D \r \r * S t a t u s 0000320 : S e m i - s u p p o r t e d 0000340 , P u b l i c . \r \r * D e s 0000360 c r i p t i o n : \r \r W A M c 0000400 a n b e u s e d t o a t 0000420 t a c h a n i c o n i c m 0000440 e n u t o a n y w i n d o 0000460 w . T h i s m e n u ( a 0000500 t t a c h e d t o t h e l 0000520 e f t o r r i g h t o f 0000540 t h e t a r g e t w i n d o 0000560 w ) c o n t a i n s v a r i 0000600 o u s i c o n s , t h a t 0000620 r e f e r t o t h e w i n 0000640 d o w a c t i o n m e n u 0000660 c o m m a n d s : C L O S E 0000700 ( a d o o r c l o s i n g ) 0000720 , R E D I S P L A Y ( a p 0000740 a i n t b r u s h ) , S H R 0000760 I N K ( a s h i r k i n g 0001000 w i n d o w i c o n ) , a n 0001020 d M O V E ( a w i n d o w 0001040 o n w h e e l s ) . \r \r 0001060 * U s e : \r \r ( W A M [ w i 0001100 n d o w ] [ b o r d e r = { L 0001120 E F T / R I G H T } ] ) \r \r \t I 0001140 f w i n d o w i s n i l , 0001160 ( W H I C H W ) i s u s e 0001200 d . \r \t B o r d e r d e f a u 0001220 l t s t o " R I G H T " . \r 0001240 \r S i m p l y s e l e c t t 0001260 h e i c o n , t o c a l l 0001300 t h e a p p r o p r i a t e 0001320 w i n d o w a c t i o n f 0001340 u n c t i o n . \r \r I u s e 0001360 i t b y a d d i n g " w a 0001400 m i f y " t o m y W i n d 0001420 o w M e n u C o m m a n d s , 0001440 w h i c h , w h e n s e l e 0001460 c t e d , c a l l s W A M . 0001500 T h i s m a k e s i t 0001520 e a s y t o a d d a w i 0001540 n d o w a c t i o n m e m u 0001560 t o a n y w i n d o w . \r 0001600 \r * N o t e s : \r \r M y i c 0001620 o n s a r e h o r r i b l e 0001640 . A n y o n e w i s h i n 0001660 g t o h a c k t h e m , 0001700 m a y f e e l f r e e . \r \r 0001720 T h e a c t i o n m e n u 0001740 g e t s r e s h a p e d a 0001760 l i t t l e b i z a r r e l y 0002000 , b y v i r t u e o f t 0002020 h e w a y t h a t a t t a 0002040 c h e w i n d o w s w o r k 0002060 . \r \r Y o u c a n u s e T 0002100 O P a n d B O T T O M f o 0002120 r t h e " e d g e " a r g 0002140 u m e n t , b u t b o y w 0002160 i l l y o u b e s u r p r 0002200 i s e d b y t h e r e s u 0002220 l t . \r \r * R e c o m m e n d 0002240 e d e n h a n c e m e n t s : 0002260 \r \r F i x t h e i c o n s 0002300 . \r \r M a k e t h e a t t a 0002320 c h e d w i n d o w ( m e n 0002340 u ) r e s p o n d c o r r e 0002360 c t l y t o r e p a i n t 0002400 s o t h a t i t f i x e s 0002420 i t s w i d t h a p p r o 0002440 p r i a t e l y . \r \r P e r m i 0002460 t T O P a n d B O T T O M 0002500 f o r a t t a c h e m e n t 0002520 . \r \r F r o m : A c u f f 0002540 . p a \r S u b j e c t : W A M 0002560 \r T o : S h r a g e r \r c c : 0002600 A c u f f . p a \r \r Y o 0002620 u u s e ( W H I C H W ) i 0002640 n t h e W A M m e n u i 0002660 t e m s . T h i s c a n 0002700 l o s e i f y o u ' v e m 0002720 o v e d t h e m o u s e i 0002740 n t h e m e a n t i m e 0002760 ( i e . w h e n w a i t i n 0003000 g f o r t h e h a n d l e 0003020 r t o b e s w a p p e d 0003040 i n ) . Y o u m i g h t 0003060 w a n t t o u s e ( W F R 0003100 O M M E N U F R O M M E N U ) 0003120 . D E F A U L T W H E N S E 0003140 L E C T E D F N b i n d s F 0003160 R O M M E N U . \r \r \t - - R i 0003200 c h \r \r F r o m : A c u f f . 0003220 p a \r S u b j e c t : W A M \r 0003240 T o : S h r a g e r \r c c : 0003260 A c u f f . p a \r \r I t h 0003300 i n k t h a t " C l o s e " 0003320 s e l e c t e d f r o m t 0003340 h e w i n d o w m e n u i 0003360 n a W A M w i n d o w s 0003400 h o u l d c l o s e t h e 0003420 W A M o n l y , t h u s g 0003440 i v i n g a w a y o f g 0003460 e t t i n g r i d o f i t 0003500 . P r o b a b l y s o m e 0003520 t h i n g l i k e W F N w 0003540 o u l d d o i t W F N w o 0003560 u l d d o o n C L O S E W 0003600 F N w o u l d d o \r \r \r \r * 0003620 U p d a t e h i s t o r y : 0003640 \r \r 7 / 1 2 / 8 4 : J e f f 0003660 S h r a g e r : C r e a t e d 0003700 . \r \0 \0 \a 214 \0 \0 \0 \n T I M E S R 0003720 O M A N \0 \n \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 0003740 \0 001 \0 \0 \0 \n T I M E S R O M A N 0003760 \0 \f \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 5 \0 \0 0004000 \0 \n T I M E S R O M A N \0 \n \0 \0 0004020 \0 \0 \0 \0 \0 \0 \0 \0 \a 302 \0 003 z 270 0004036