;ELC   
;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:52:21 2003
;;; from file /home/pot/gnu/emacs-pretest.new/lisp/term/x-win.el
;;; in Emacs version 21.3
;;; with bytecomp version 2.85.4.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`x-win.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\303=\204\f \304\305\306 \"\210\307\310!\210\307\311!\210\307\312!\210\307\313!\210\307\314!\210\307\315!\210\316\317!\203. \307\320!\210\321	B\302	B\322\302!\204> \323\323\207" [window-system current-load-list x-command-line-resources x error "%s: Loading x-win.el but not compiled for X" invocation-name require frame mouse scroll-bar faces select menu-bar fboundp new-fontset fontset x-invocation-args boundp nil] 3)
(defalias 'x-handle-switch #[(switch) "\306	\"\211\205. \307\n8\310\n8\203 \fBB\211\202- \f	@BB	A\211	*)\207" [switch command-line-x-option-alist aelt value param default-frame-alist assoc 3 4 x-invocation-args] 4])
(defalias 'x-handle-numeric-switch #[(switch) "\306	\"\211\205 \307\n8\211\310\f@!BB\fA\211))\207" [switch command-line-x-option-alist aelt param x-invocation-args default-frame-alist assoc 3 string-to-int] 4])
(defalias 'x-handle-iconic #[(switch) "\301B\211\207" [initial-frame-alist (visibility . icon)] 2])
(defalias 'x-handle-xrm-switch #[(switch) ":\204\f \303\304\305 	#\210\n\204 @\202 \n\306@QA\211\207" [x-invocation-args switch x-command-line-resources error "%s: missing argument to `%s' option" invocation-name "\n"] 4])
(defalias 'x-handle-geometry #[(switch) "\303@!\304\n\305	\236\204 \306	\236\205 \307\310	\236\204  \311	\236\205! \312	$A\211)\207" [x-invocation-args geo initial-frame-alist x-parse-geometry append left top ((user-position . t)) height width ((user-size . t))] 5])
(defalias 'x-handle-name-switch #[(switch) ":\204\f \304\305\306 	#\210@A\307\nBB\211\207" [x-invocation-args switch x-resource-name initial-frame-alist error "%s: missing argument to `%s' option" invocation-name name] 4])
#@51 The X display name specifying server and X frame.
(defvar x-display-name nil (#$ . 2338))
(defalias 'x-handle-display #[(switch) "@A\302\303	\"\207" [x-invocation-args x-display-name setenv "DISPLAY"] 3])
#@411 Process the X-related command line options in ARGS.
This is done before the user's startup file is loaded.  They are copied to
`x-invocation-args', from which the X-related things are extracted, first
the switch (e.g., "-fg") in the following code, and possible values
(e.g., "black") in the option handler code (e.g., x-handle-switch).
This function returns ARGS minus the arguments that have been processed.
(defalias 'x-handle-args #[(args) "\306	\203\230 	@\307\232\204\230 	@\211\306\306\306\306	A\310\311\n\"\2035 \n\312\225\306O\n\312\211\225SO\310\313\n\"\203` \314\n\"\211\315=\204` \f;\203` \316\f\"\211\204] \317\320\n\"\210\f)\316\n\"\211\203q \3218\203\217 \203\207 	B\n!\210)\202\223 \n!\210\202\223 B.\202 \237	\244\207" [args x-invocation-args this-switch orig-this-switch completion argval nil "--" string-match "^--[^=]*=" 0 "^--" try-completion t assoc error "Option `%s' is ambiguous" 2 aelt handler command-line-x-option-alist elt] 4 (#$ . 2554)])
(byte-code "\301B\306\302B\307\303B\310\304B\311\305B\312\313B\314\315B\316\317B\320\321B\322\323B\324\325B\326\327B\330\331B\332\333B\334\335B\336\337B\340\341B\342!\343B\344#\345B\346%\347B\350'\351B\352)\353B\354+\355B\356-\357B\360/\361B\3621\363B\3643\365B\3665\367B\3707\371B\3729\373B\374;\375B\376=\377B\201m ?\201@ B\201n @\201A B\201o A\201B B\201p B\201C B\201q C\201D B\201r D\201E B\201s E\201F B\201t F\201G B\201u G\201H B\201v H\201I B\201w I\201J B\201x J\201K B\201y K\201L B\201z L\201M B\201{ M\201N B\201| N\201O B\201} O\201P B\201~ P\201Q B\201 Q\201R B\201\200 R\201S B\201\201 S\201T B\201\202 T\201U B\201\203 U\201V B\201\204 V\201W B\201\205 W\201X B\201\206 X\201Y B\201\207 Y\201Z B\201\210 Z\201[ B\201\211 [\201\\ B\201\212 \\\201] B\201\213 ]\201^ B\201\214 ^\201_ B\201\215 _\201` B\201\216 `\201a B\201\217 a\201b B\201\220 b\201c B\201\221 c\201d B\201\222 d\201e B\201\223 e\201f B\201\224 f\201g B\201\225 g\201h B\201\226 h\201i B\201\227 i\201j B\201\230 j\201k B\201\231 k\201l B\201\232 l\301\207" [current-load-list x-pointer-X-cursor x-pointer-arrow x-pointer-based-arrow-down x-pointer-based-arrow-up x-pointer-boat 0 2 4 6 8 x-pointer-bogosity 10 x-pointer-bottom-left-corner 12 x-pointer-bottom-right-corner 14 x-pointer-bottom-side 16 x-pointer-bottom-tee 18 x-pointer-box-spiral 20 x-pointer-center-ptr 22 x-pointer-circle 24 x-pointer-clock 26 x-pointer-coffee-mug 28 x-pointer-cross 30 x-pointer-cross-reverse 32 x-pointer-crosshair 34 x-pointer-diamond-cross 36 x-pointer-dot 38 x-pointer-dotbox 40 x-pointer-double-arrow 42 x-pointer-draft-large 44 x-pointer-draft-small 46 x-pointer-draped-box 48 x-pointer-exchange 50 x-pointer-fleur 52 x-pointer-gobbler 54 x-pointer-gumby 56 x-pointer-hand1 58 x-pointer-hand2 60 x-pointer-heart x-pointer-icon x-pointer-iron-cross x-pointer-left-ptr x-pointer-left-side x-pointer-left-tee x-pointer-leftbutton x-pointer-ll-angle x-pointer-lr-angle x-pointer-man x-pointer-middlebutton x-pointer-mouse x-pointer-pencil x-pointer-pirate x-pointer-plus x-pointer-question-arrow x-pointer-right-ptr x-pointer-right-side x-pointer-right-tee x-pointer-rightbutton x-pointer-rtl-logo x-pointer-sailboat x-pointer-sb-down-arrow x-pointer-sb-h-double-arrow x-pointer-sb-left-arrow x-pointer-sb-right-arrow x-pointer-sb-up-arrow x-pointer-sb-v-double-arrow x-pointer-shuttle x-pointer-sizing x-pointer-spider x-pointer-spraycan x-pointer-star x-pointer-target x-pointer-tcross x-pointer-top-left-arrow x-pointer-top-left-corner x-pointer-top-right-corner x-pointer-top-side x-pointer-top-tee x-pointer-trek x-pointer-ul-angle x-pointer-umbrella x-pointer-ur-angle x-pointer-watch x-pointer-xterm 62 64 66 68 70 72 74 76 78 80 82 84 86 88 90 92 94 96 98 100 102 104 106 108 110 112 114 116 118 120 122 124 126 128 130 132 134 136 138 140 142 144 146 148 150 152] 2)
#@102 The list of X colors from the `rgb.txt' file.
XConsortium: rgb.txt,v 10.41 94/02/20 18:39:36 rws Exp
(defvar x-colors '("LightGreen" "light green" "DarkRed" "dark red" "DarkMagenta" "dark magenta" "DarkCyan" "dark cyan" "DarkBlue" "dark blue" "DarkGray" "dark gray" "DarkGrey" "dark grey" "grey100" "gray100" "grey99" "gray99" "grey98" "gray98" "grey97" "gray97" "grey96" "gray96" "grey95" "gray95" "grey94" "gray94" "grey93" "gray93" "grey92" "gray92" "grey91" "gray91" "grey90" "gray90" "grey89" "gray89" "grey88" "gray88" "grey87" "gray87" "grey86" "gray86" "grey85" "gray85" "grey84" "gray84" "grey83" "gray83" "grey82" "gray82" "grey81" "gray81" "grey80" "gray80" "grey79" "gray79" "grey78" "gray78" "grey77" "gray77" "grey76" "gray76" "grey75" "gray75" "grey74" "gray74" "grey73" "gray73" "grey72" "gray72" "grey71" "gray71" "grey70" "gray70" "grey69" "gray69" "grey68" "gray68" "grey67" "gray67" "grey66" "gray66" "grey65" "gray65" "grey64" "gray64" "grey63" "gray63" "grey62" "gray62" "grey61" "gray61" "grey60" "gray60" "grey59" "gray59" "grey58" "gray58" "grey57" "gray57" "grey56" "gray56" "grey55" "gray55" "grey54" "gray54" "grey53" "gray53" "grey52" "gray52" "grey51" "gray51" "grey50" "gray50" "grey49" "gray49" "grey48" "gray48" "grey47" "gray47" "grey46" "gray46" "grey45" "gray45" "grey44" "gray44" "grey43" "gray43" "grey42" "gray42" "grey41" "gray41" "grey40" "gray40" "grey39" "gray39" "grey38" "gray38" "grey37" "gray37" "grey36" "gray36" "grey35" "gray35" "grey34" "gray34" "grey33" "gray33" "grey32" "gray32" "grey31" "gray31" "grey30" "gray30" "grey29" "gray29" "grey28" "gray28" "grey27" "gray27" "grey26" "gray26" "grey25" "gray25" "grey24" "gray24" "grey23" "gray23" "grey22" "gray22" "grey21" "gray21" "grey20" "gray20" "grey19" "gray19" "grey18" "gray18" "grey17" "gray17" "grey16" "gray16" "grey15" "gray15" "grey14" "gray14" "grey13" "gray13" "grey12" "gray12" "grey11" "gray11" "grey10" "gray10" "grey9" "gray9" "grey8" "gray8" "grey7" "gray7" "grey6" "gray6" "grey5" "gray5" "grey4" "gray4" "grey3" "gray3" "grey2" "gray2" "grey1" "gray1" "grey0" "gray0" "thistle4" "thistle3" "thistle2" "thistle1" "MediumPurple4" "MediumPurple3" "MediumPurple2" "MediumPurple1" "purple4" "purple3" "purple2" "purple1" "DarkOrchid4" "DarkOrchid3" "DarkOrchid2" "DarkOrchid1" "MediumOrchid4" "MediumOrchid3" "MediumOrchid2" "MediumOrchid1" "plum4" "plum3" "plum2" "plum1" "orchid4" "orchid3" "orchid2" "orchid1" "magenta4" "magenta3" "magenta2" "magenta1" "VioletRed4" "VioletRed3" "VioletRed2" "VioletRed1" "maroon4" "maroon3" "maroon2" "maroon1" "PaleVioletRed4" "PaleVioletRed3" "PaleVioletRed2" "PaleVioletRed1" "LightPink4" "LightPink3" "LightPink2" "LightPink1" "pink4" "pink3" "pink2" "pink1" "HotPink4" "HotPink3" "HotPink2" "HotPink1" "DeepPink4" "DeepPink3" "DeepPink2" "DeepPink1" "red4" "red3" "red2" "red1" "OrangeRed4" "OrangeRed3" "OrangeRed2" "OrangeRed1" "tomato4" "tomato3" "tomato2" "tomato1" "coral4" "coral3" "coral2" "coral1" "DarkOrange4" "DarkOrange3" "DarkOrange2" "DarkOrange1" "orange4" "orange3" "orange2" "orange1" "LightSalmon4" "LightSalmon3" "LightSalmon2" "LightSalmon1" "salmon4" "salmon3" "salmon2" "salmon1" "brown4" "brown3" "brown2" "brown1" "firebrick4" "firebrick3" "firebrick2" "firebrick1" "chocolate4" "chocolate3" "chocolate2" "chocolate1" "tan4" "tan3" "tan2" "tan1" "wheat4" "wheat3" "wheat2" "wheat1" "burlywood4" "burlywood3" "burlywood2" "burlywood1" "sienna4" "sienna3" "sienna2" "sienna1" "IndianRed4" "IndianRed3" "IndianRed2" "IndianRed1" "RosyBrown4" "RosyBrown3" "RosyBrown2" "RosyBrown1" "DarkGoldenrod4" "DarkGoldenrod3" "DarkGoldenrod2" "DarkGoldenrod1" "goldenrod4" "goldenrod3" "goldenrod2" "goldenrod1" "gold4" "gold3" "gold2" "gold1" "yellow4" "yellow3" "yellow2" "yellow1" "LightYellow4" "LightYellow3" "LightYellow2" "LightYellow1" "LightGoldenrod4" "LightGoldenrod3" "LightGoldenrod2" "LightGoldenrod1" "khaki4" "khaki3" "khaki2" "khaki1" "DarkOliveGreen4" "DarkOliveGreen3" "DarkOliveGreen2" "DarkOliveGreen1" "OliveDrab4" "OliveDrab3" "OliveDrab2" "OliveDrab1" "chartreuse4" "chartreuse3" "chartreuse2" "chartreuse1" "green4" "green3" "green2" "green1" "SpringGreen4" "SpringGreen3" "SpringGreen2" "SpringGreen1" "PaleGreen4" "PaleGreen3" "PaleGreen2" "PaleGreen1" "SeaGreen4" "SeaGreen3" "SeaGreen2" "SeaGreen1" "DarkSeaGreen4" "DarkSeaGreen3" "DarkSeaGreen2" "DarkSeaGreen1" "aquamarine4" "aquamarine3" "aquamarine2" "aquamarine1" "DarkSlateGray4" "DarkSlateGray3" "DarkSlateGray2" "DarkSlateGray1" "cyan4" "cyan3" "cyan2" "cyan1" "turquoise4" "turquoise3" "turquoise2" "turquoise1" "CadetBlue4" "CadetBlue3" "CadetBlue2" "CadetBlue1" "PaleTurquoise4" "PaleTurquoise3" "PaleTurquoise2" "PaleTurquoise1" "LightCyan4" "LightCyan3" "LightCyan2" "LightCyan1" "LightBlue4" "LightBlue3" "LightBlue2" "LightBlue1" "LightSteelBlue4" "LightSteelBlue3" "LightSteelBlue2" "LightSteelBlue1" "SlateGray4" "SlateGray3" "SlateGray2" "SlateGray1" "LightSkyBlue4" "LightSkyBlue3" "LightSkyBlue2" "LightSkyBlue1" "SkyBlue4" "SkyBlue3" "SkyBlue2" "SkyBlue1" "DeepSkyBlue4" "DeepSkyBlue3" "DeepSkyBlue2" "DeepSkyBlue1" "SteelBlue4" "SteelBlue3" "SteelBlue2" "SteelBlue1" "DodgerBlue4" "DodgerBlue3" "DodgerBlue2" "DodgerBlue1" "blue4" "blue3" "blue2" "blue1" "RoyalBlue4" "RoyalBlue3" "RoyalBlue2" "RoyalBlue1" "SlateBlue4" "SlateBlue3" "SlateBlue2" "SlateBlue1" "azure4" "azure3" "azure2" "azure1" "MistyRose4" "MistyRose3" "MistyRose2" "MistyRose1" "LavenderBlush4" "LavenderBlush3" "LavenderBlush2" "LavenderBlush1" "honeydew4" "honeydew3" "honeydew2" "honeydew1" "ivory4" "ivory3" "ivory2" "ivory1" "cornsilk4" "cornsilk3" "cornsilk2" "cornsilk1" "LemonChiffon4" "LemonChiffon3" "LemonChiffon2" "LemonChiffon1" "NavajoWhite4" "NavajoWhite3" "NavajoWhite2" "NavajoWhite1" "PeachPuff4" "PeachPuff3" "PeachPuff2" "PeachPuff1" "bisque4" "bisque3" "bisque2" "bisque1" "AntiqueWhite4" "AntiqueWhite3" "AntiqueWhite2" "AntiqueWhite1" "seashell4" "seashell3" "seashell2" "seashell1" "snow4" "snow3" "snow2" "snow1" "thistle" "MediumPurple" "medium purple" "purple" "BlueViolet" "blue violet" "DarkViolet" "dark violet" "DarkOrchid" "dark orchid" "MediumOrchid" "medium orchid" "orchid" "plum" "violet" "magenta" "VioletRed" "violet red" "MediumVioletRed" "medium violet red" "maroon" "PaleVioletRed" "pale violet red" "LightPink" "light pink" "pink" "DeepPink" "deep pink" "HotPink" "hot pink" "red" "OrangeRed" "orange red" "tomato" "LightCoral" "light coral" "coral" "DarkOrange" "dark orange" "orange" "LightSalmon" "light salmon" "salmon" "DarkSalmon" "dark salmon" "brown" "firebrick" "chocolate" "tan" "SandyBrown" "sandy brown" "wheat" "beige" "burlywood" "peru" "sienna" "SaddleBrown" "saddle brown" "IndianRed" "indian red" "RosyBrown" "rosy brown" "DarkGoldenrod" "dark goldenrod" "goldenrod" "LightGoldenrod" "light goldenrod" "gold" "yellow" "LightYellow" "light yellow" "LightGoldenrodYellow" "light goldenrod yellow" "PaleGoldenrod" "pale goldenrod" "khaki" "DarkKhaki" "dark khaki" "OliveDrab" "olive drab" "ForestGreen" "forest green" "YellowGreen" "yellow green" "LimeGreen" "lime green" "GreenYellow" "green yellow" "MediumSpringGreen" "medium spring green" "chartreuse" "green" "LawnGreen" "lawn green" "SpringGreen" "spring green" "PaleGreen" "pale green" "LightSeaGreen" "light sea green" "MediumSeaGreen" "medium sea green" "SeaGreen" "sea green" "DarkSeaGreen" "dark sea green" "DarkOliveGreen" "dark olive green" "DarkGreen" "dark green" "aquamarine" "MediumAquamarine" "medium aquamarine" "CadetBlue" "cadet blue" "LightCyan" "light cyan" "cyan" "turquoise" "MediumTurquoise" "medium turquoise" "DarkTurquoise" "dark turquoise" "PaleTurquoise" "pale turquoise" "PowderBlue" "powder blue" "LightBlue" "light blue" "LightSteelBlue" "light steel blue" "SteelBlue" "steel blue" "LightSkyBlue" "light sky blue" "SkyBlue" "sky blue" "DeepSkyBlue" "deep sky blue" "DodgerBlue" "dodger blue" "blue" "RoyalBlue" "royal blue" "MediumBlue" "medium blue" "LightSlateBlue" "light slate blue" "MediumSlateBlue" "medium slate blue" "SlateBlue" "slate blue" "DarkSlateBlue" "dark slate blue" "CornflowerBlue" "cornflower blue" "NavyBlue" "navy blue" "navy" "MidnightBlue" "midnight blue" "LightGray" "light gray" "LightGrey" "light grey" "grey" "gray" "LightSlateGrey" "light slate grey" "LightSlateGray" "light slate gray" "SlateGrey" "slate grey" "SlateGray" "slate gray" "DimGrey" "dim grey" "DimGray" "dim gray" "DarkSlateGrey" "dark slate grey" "DarkSlateGray" "dark slate gray" "black" "white" "MistyRose" "misty rose" "LavenderBlush" "lavender blush" "lavender" "AliceBlue" "alice blue" "azure" "MintCream" "mint cream" "honeydew" "seashell" "LemonChiffon" "lemon chiffon" "ivory" "cornsilk" "moccasin" "NavajoWhite" "navajo white" "PeachPuff" "peach puff" "bisque" "BlanchedAlmond" "blanched almond" "PapayaWhip" "papaya whip" "AntiqueWhite" "antique white" "linen" "OldLace" "old lace" "FloralWhite" "floral white" "gainsboro" "WhiteSmoke" "white smoke" "GhostWhite" "ghost white" "snow") (#$ . 6664))
#@58 Internal function called by `defined-colors', which see.
(defalias 'xw-defined-colors #[(&optional frame) "\204 \305 	\306\211\f\203& \f@\fA\307\310#\203 \nB\202 \n+\207" [frame x-colors defined-colors this-color all-colors selected-frame nil color-supported-p t] 4 (#$ . 15652)])
#@69 Iconify the selected frame, or deiconify if it's currently an icon.
(defalias 'iconify-or-deiconify-frame #[nil "\300\301 \236A\302=\203 \303 \207\304 \207" [visibility frame-parameters t iconify-frame make-frame-visible] 2 (#$ . 15953) nil])
(byte-code "\302\303\304#\210\305	\306\307#\210\305	\310\311#\210\305	\312\313#\210\305	\314\315#\210\305	\316\317#\210\305	\320\321#\210\305	\322\323#\210\305	\324\325#\210\305	\326\327#\210\305	\330\331#\210\305	\332\333#\210\305	\334\335#\210\305	\336\337#\210\305	\340\341#\210\305	\342\343#\210\344\345\346\347#\210\344\350\346\347#\210\344\351\346\352#\210\344\353\346\354#\210\344\355\346\356#\210\344\357\346\360#\210\344\361\346\362#\207" [global-map function-key-map substitute-key-definition suspend-emacs iconify-or-deiconify-frame define-key [backspace] [127] [delete] [127] [tab] [9] [linefeed] [10] [clear] [12] [return] [13] [escape] [27] [M-backspace] [-134217601] [M-delete] [-134217601] [M-tab] [-134217719] [M-linefeed] [-134217718] [M-clear] [-134217716] [M-return] [-134217715] [M-escape] [-134217701] [iso-lefttab] [backtab] put backspace ascii-character 127 delete tab 9 linefeed 10 clear 12 return 13 escape 27] 4)
#@161 Return the appropriate value of system-key-alist for VENDOR.
VENDOR is a string containing the name of the X Server's vendor,
as returned by (x-server-vendor).
(defalias 'vendor-specific-keysyms #[(vendor) "\301\230\203 \302\207\303\230\204 \304\230\203 \305\207\306\230\204\" \307\230\203$ \310\207\311\207" [vendor "Apollo Computer Inc." ((65280 . linedel) (65281 . chardel) (65282 . copy) (65283 . cut) (65284 . paste) (65285 . move) (65286 . grow) (65287 . cmd) (65288 . shell) (65289 . leftbar) (65290 . rightbar) (65291 . leftbox) (65292 . rightbox) (65293 . upbox) (65294 . downbox) (65295 . pop) (65296 . read) (65297 . edit) (65298 . save) (65299 . exit) (65300 . repeat)) "Hewlett-Packard Incorporated" "Hewlett-Packard Company" ((168 . mute-acute) (169 . mute-grave) (170 . mute-asciicircum) (171 . mute-diaeresis) (172 . mute-asciitilde) (175 . lira) (190 . guilder) (252 . block) (256 . longminus) (65388 . reset) (65389 . system) (65390 . user) (65391 . clearline) (65392 . insertline) (65393 . deleteline) (65394 . insertchar) (65395 . deletechar) (65396 . backtab) (65397 . kp-backtab)) "X11/NeWS - Sun Microsystems Inc." "X Consortium" ((392976 . f36) (392977 . f37) (393056 . req) (393072 . props) (393073 . front) (393074 . copy) (393075 . open) (393076 . paste) (393077 . cut)) ((65280 . remove))] 2 (#$ . 17145)])
(byte-code "\301B\302\301!\204\f \303\303\207" [current-load-list x-last-selected-text boundp nil] 2)
#@52 Max number of characters to put in the cut buffer.
(defvar x-cut-buffer-max 20000 (#$ . 18599))
#@124 Non-nil means cutting and pasting uses the clipboard.
This is in addition to, but in preference to, the primary selection.
(custom-declare-variable 'x-select-enable-clipboard 'nil '(#$ . 18702) :type 'boolean :group 'killing)
(defalias 'x-select-text #[(text &optional push) "G	W\203 \305\n\"\210\202 \305\306\n\"\210\307\310\"\210\203\" \307\311\"\210\211\207" [text x-cut-buffer-max push x-select-enable-clipboard x-last-selected-text x-set-cut-buffer "" x-set-selection PRIMARY CLIPBOARD] 3])
(defalias 'x-cut-buffer-or-selection-value #[nil "\303	\203  \204 \304\305\306\217\210\204 \304\307\310\217\210\311\230\203  \303\204) \304\312\313\217\210\2042 \304\314\315\217\210\311\230\203: \303\204B \316\317!\311\230\203J \303\204R \303\202k \n=\203\\ \303\202k \n\230\203h \303\202k \211)\207" [text x-select-enable-clipboard x-last-selected-text nil c (byte-code "\301\302\303\"\301\207" [text x-get-selection CLIPBOARD COMPOUND_TEXT] 3) ((error)) (byte-code "\301\302\303\"\301\207" [text x-get-selection CLIPBOARD STRING] 3) ((error)) "" (byte-code "\301\302\303\"\301\207" [text x-get-selection PRIMARY COMPOUND_TEXT] 3) ((error)) (byte-code "\301\302\303\"\301\207" [text x-get-selection PRIMARY STRING] 3) ((error)) x-get-cut-buffer 0] 3])
(byte-code "\306!	;\204  \307\310 \311\312	\"\211\203 	\n\313I\210\202 )\314\315!\2037 \316\2060 \317\320!\211\f\321#\210\202D \316\206A \317\320!\211\f\"\210\322\323 \324\245\325Z9^9\314\326!\203\273 \327:\321\"\210\330 \210\331;\236A\206t \331<\236A\206t \332\333\334\"\307\211=>\211\203\272 \335!\204\272 \336!\211=\203\272 \337!\211>\203\272 >?H\340\230\203\262 \326\341>\307\"\"\210\202\272 \342=\343#\210+\311\344\345 \"\203\306 \346 \210\332\347\350\"@\307A@\203\351@!A\352A\236\204\350 \353A\236\203\360 \354\355ABBA\356;A\";\357A\236\203\357\211A\236AB<B<\360A\236\203\360\211A\236AB<B<*\321B\332\361\362\"\211C\203:\311\363C\"\203:\364<B<*\332\365\366\"D\367ED\203O\370D!E)\307\207" [command-line-args x-resource-name i x-display-name x-command-line-resources frame-creation-function x-handle-args nil invocation-name string-match "[.*]" 45 fboundp x-close-connection x-open-connection getenv "DISPLAY" t x-create-frame-with-faces x-server-max-request-size 2 100 new-fontset create-fontset-from-fontset-spec create-fontset-from-x-resource font x-get-resource "font" "Font" query-fontset x-resolve-font-name x-decompose-font-name "fontset" x-complement-fontset-spec create-fontset-from-ascii-font "startup" "Sun Microsystems,? Inc\\." x-server-vendor menu-bar-enable-clipboard "geometry" "Geometry" x-parse-geometry top left (user-position . t) (user-size . t) append height width "reverseVideo" "ReverseVideo" "^\\(true\\|yes\\|on\\)$" (reverse . t) "selectionTimeout" "SelectionTimeout" 20000 string-to-number x-cut-buffer-max standard-fontset-spec initial-frame-alist default-frame-alist resolved-name xlfd-fields xlfd-regexp-registry-subnum res-geometry parsed case-fold-search rv res-selection-timeout x-selection-timeout] 6)
(defalias 'x-win-suspend-error #[nil "\300\301!\207" [error "Suspending an emacs running under X makes no sense"] 2])
(byte-code "\303\304\305\"\210\306\307\310\311\312\313\"\207" [interprogram-cut-function interprogram-paste-function split-window-keep-point add-hook suspend-hook x-win-suspend-error x-select-text x-cut-buffer-or-selection-value t set-default mode-line-frame-identification "  "] 3)