%PDF-
%PDF-
Mini Shell
Mini Shell
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\301\302!\204 \303\304\"\210\305\306!\210\305\307!\210\305\310!\210\305\311!\210\305\312!\210\305\313!\210\305\314!\210\305\315!\210\305\316!\207" [invocation-name fboundp x-create-frame error "%s: Loading x-win.el but not compiled for X" require term/common-win frame mouse scroll-bar faces select menu-bar fontset x-dnd] 3)
#@15
(fn SWITCH)
(defalias 'x-handle-no-bitmap-icon #[257 "\301B\211\207" [default-frame-alist (icon-type)] 3 (#$ . 748)])
#@15
(fn SWITCH)
(defalias 'x-handle-parent-id #[257 ":\204 \303\304 #\210\305\306@!B\nBA\211\207" [x-invocation-args invocation-name initial-frame-alist error "%s: missing argument to `%s' option" parent-id string-to-number] 5 (#$ . 876)])
#@15
(fn SWITCH)
(defalias 'x-handle-smid #[257 ":\204 \303\304 #\210@A\211\207" [x-invocation-args invocation-name x-session-previous-id error "%s: missing argument to `%s' option"] 5 (#$ . 1127)])
#@233 Special hook run when a save-session event occurs.
The functions do not get any argument.
Functions can return non-nil to inform the session manager that the
window system shutdown should be aborted.
See also `emacs-session-save'.
(defvar emacs-save-session-functions nil (#$ . 1337))
#@190 Construct a filename to save the session in based on SESSION-ID.
Return a filename in `user-emacs-directory', unless the session file
already exists in the home directory.
(fn SESSION-ID)
(defalias 'emacs-session-filename #[257 "\300P\301\302P\"\207" ["session." locate-user-emacs-file ".emacs-"] 6 (#$ . 1630)])
#@805 This function is called when the window system is shutting down.
If this function returns non-nil, the window system shutdown is canceled.
When a session manager tells Emacs that the window system is shutting
down, this function is called. It calls the functions in the hook
`emacs-save-session-functions'. Functions are called with the current
buffer set to a temporary buffer. Functions should use `insert' to insert
lisp code to save the session state. The buffer is saved in a file in the
home directory of the user running Emacs. The file is evaluated when
Emacs is restarted by the session manager.
If any of the functions returns non-nil, no more functions are called
and this function returns non-nil. This will inform the session manager
that it should abort the window system shutdown.
(defalias 'emacs-session-save #[0 "\301!\302\303P!\304!\203 \305!\210r\211q\210\3061! \307\310!0\202# \210\311\211\204+ \312!\210\313!\210\211\262)\207" [x-session-id emacs-session-filename get-buffer-create " *SES " file-exists-p delete-file (error) run-hook-with-args-until-success emacs-save-session-functions t write-file kill-buffer] 5 (#$ . 1954)])
#@164 Restore the Emacs session if started by a session manager.
The file saved by `emacs-session-save' is evaluated and deleted if it
exists.
(fn PREVIOUS-SESSION-ID)
(defalias 'emacs-session-restore #[257 "\300!\301!\205 \302!\210\303!\210\304\305!\207" [emacs-session-filename file-exists-p load-file delete-file message "Restored session data"] 4 (#$ . 3128)])
(defconst x-pointer-X-cursor 0)
(defconst x-pointer-arrow 2)
(defconst x-pointer-based-arrow-down 4)
(defconst x-pointer-based-arrow-up 6)
(defconst x-pointer-boat 8)
(defconst x-pointer-bogosity 10)
(defconst x-pointer-bottom-left-corner 12)
(defconst x-pointer-bottom-right-corner 14)
(defconst x-pointer-bottom-side 16)
(defconst x-pointer-bottom-tee 18)
(defconst x-pointer-box-spiral 20)
(defconst x-pointer-center-ptr 22)
(defconst x-pointer-circle 24)
(defconst x-pointer-clock 26)
(defconst x-pointer-coffee-mug 28)
(defconst x-pointer-cross 30)
(defconst x-pointer-cross-reverse 32)
(defconst x-pointer-crosshair 34)
(defconst x-pointer-diamond-cross 36)
(defconst x-pointer-dot 38)
(defconst x-pointer-dotbox 40)
(defconst x-pointer-double-arrow 42)
(defconst x-pointer-draft-large 44)
(defconst x-pointer-draft-small 46)
(defconst x-pointer-draped-box 48)
(defconst x-pointer-exchange 50)
(defconst x-pointer-fleur 52)
(defconst x-pointer-gobbler 54)
(defconst x-pointer-gumby 56)
(defconst x-pointer-hand1 58)
(defconst x-pointer-hand2 60)
(defconst x-pointer-heart 62)
(defconst x-pointer-icon 64)
(defconst x-pointer-iron-cross 66)
(defconst x-pointer-left-ptr 68)
(defconst x-pointer-left-side 70)
(defconst x-pointer-left-tee 72)
(defconst x-pointer-leftbutton 74)
(defconst x-pointer-ll-angle 76)
(defconst x-pointer-lr-angle 78)
(defconst x-pointer-man 80)
(defconst x-pointer-middlebutton 82)
(defconst x-pointer-mouse 84)
(defconst x-pointer-pencil 86)
(defconst x-pointer-pirate 88)
(defconst x-pointer-plus 90)
(defconst x-pointer-question-arrow 92)
(defconst x-pointer-right-ptr 94)
(defconst x-pointer-right-side 96)
(defconst x-pointer-right-tee 98)
(defconst x-pointer-rightbutton 100)
(defconst x-pointer-rtl-logo 102)
(defconst x-pointer-sailboat 104)
(defconst x-pointer-sb-down-arrow 106)
(defconst x-pointer-sb-h-double-arrow 108)
(defconst x-pointer-sb-left-arrow 110)
(defconst x-pointer-sb-right-arrow 112)
(defconst x-pointer-sb-up-arrow 114)
(defconst x-pointer-sb-v-double-arrow 116)
(defconst x-pointer-shuttle 118)
(defconst x-pointer-sizing 120)
(defconst x-pointer-spider 122)
(defconst x-pointer-spraycan 124)
(defconst x-pointer-star 126)
(defconst x-pointer-target 128)
(defconst x-pointer-tcross 130)
(defconst x-pointer-top-left-arrow 132)
(defconst x-pointer-top-left-corner 134)
(defconst x-pointer-top-right-corner 136)
(defconst x-pointer-top-side 138)
(defconst x-pointer-top-tee 140)
(defconst x-pointer-trek 142)
(defconst x-pointer-ul-angle 144)
(defconst x-pointer-umbrella 146)
(defconst x-pointer-ur-angle 148)
(defconst x-pointer-watch 150)
(defconst x-pointer-xterm 152)
(defconst x-pointer-invisible 255)
#@176 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'.
(fn VENDOR)
(defalias 'vendor-specific-keysyms #[257 "\211\300\230\204\f \211\301\230\203 \302\207\211\303\230\204 \211\304\230\203 \305\207\306\207" ["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))] 3 (#$ . 6165)])
(byte-code "\301\211\302W\203 \303\211#\210\211T\262\202 \210\304\211\203+ \211@\303@A#\210A\266\202\202 \210\305\306\307\310#\210\311\306\307\312#\207" [x-keysym-table 160 256 puthash ((417 . 260) (418 . 728) (419 . 321) (421 . 317) (422 . 346) (425 . 352) (426 . 350) (427 . 356) (428 . 377) (430 . 381) (431 . 379) (433 . 261) (434 . 731) (435 . 322) (437 . 318) (438 . 347) (439 . 711) (441 . 353) (442 . 351) (443 . 357) (444 . 378) (445 . 733) (446 . 382) (447 . 380) (448 . 340) (451 . 258) (453 . 313) (454 . 262) (456 . 268) (458 . 280) (460 . 282) (463 . 270) (464 . 272) (465 . 323) (466 . 327) (469 . 336) (472 . 344) (473 . 366) (475 . 368) (478 . 354) (480 . 341) (483 . 259) (485 . 314) (486 . 263) (488 . 269) (490 . 281) (492 . 283) (495 . 271) (496 . 273) (497 . 324) (498 . 328) (501 . 337) (504 . 345) (505 . 367) (507 . 369) (510 . 355) (511 . 729) (673 . 294) (678 . 292) (681 . 304) (683 . 286) (684 . 308) (689 . 295) (694 . 293) (697 . 305) (699 . 287) (700 . 309) (709 . 266) (710 . 264) (725 . 288) (728 . 284) (733 . 364) (734 . 348) (741 . 267) (742 . 265) (757 . 289) (760 . 285) (765 . 365) (766 . 349) (930 . 312) (931 . 342) (933 . 296) (934 . 315) (938 . 274) (939 . 290) (940 . 358) (947 . 343) (949 . 297) (950 . 316) (954 . 275) (955 . 291) (956 . 359) (957 . 330) (959 . 331) (960 . 256) (967 . 302) (972 . 278) (975 . 298) (977 . 325) (978 . 332) (979 . 310) (985 . 370) (989 . 360) (990 . 362) (992 . 257) (999 . 303) (1004 . 279) (1007 . 299) (1009 . 326) (1010 . 333) (1011 . 311) (1017 . 371) (1021 . 361) (1022 . 363) (1150 . 8254) (1185 . 12290) (1186 . 12300) (1187 . 12301) (1188 . 12289) (1189 . 12539) (1190 . 12530) (1191 . 12449) (1192 . 12451) (1193 . 12453) (1194 . 12455) (1195 . 12457) (1196 . 12515) (1197 . 12517) (1198 . 12519) (1199 . 12483) (1200 . 12540) (1201 . 12450) (1202 . 12452) (1203 . 12454) (1204 . 12456) (1205 . 12458) (1206 . 12459) (1207 . 12461) (1208 . 12463) (1209 . 12465) (1210 . 12467) (1211 . 12469) (1212 . 12471) (1213 . 12473) (1214 . 12475) (1215 . 12477) (1216 . 12479) (1217 . 12481) (1218 . 12484) (1219 . 12486) (1220 . 12488) (1221 . 12490) (1222 . 12491) (1223 . 12492) (1224 . 12493) (1225 . 12494) (1226 . 12495) (1227 . 12498) (1228 . 12501) (1229 . 12504) (1230 . 12507) (1231 . 12510) (1232 . 12511) (1233 . 12512) (1234 . 12513) (1235 . 12514) (1236 . 12516) (1237 . 12518) (1238 . 12520) (1239 . 12521) (1240 . 12522) (1241 . 12523) (1242 . 12524) (1243 . 12525) (1244 . 12527) (1245 . 12531) (1246 . 12443) (1247 . 12444) (1452 . 1548) (1467 . 1563) (1471 . 1567) (1473 . 1569) (1474 . 1570) (1475 . 1571) (1476 . 1572) (1477 . 1573) (1478 . 1574) (1479 . 1575) (1480 . 1576) (1481 . 1577) (1482 . 1578) (1483 . 1579) (1484 . 1580) (1485 . 1581) (1486 . 1582) (1487 . 1583) (1488 . 1584) (1489 . 1585) (1490 . 1586) (1491 . 1587) (1492 . 1588) (1493 . 1589) (1494 . 1590) (1495 . 1591) (1496 . 1592) (1497 . 1593) (1498 . 1594) (1504 . 1600) (1505 . 1601) (1506 . 1602) (1507 . 1603) (1508 . 1604) (1509 . 1605) (1510 . 1606) (1511 . 1607) (1512 . 1608) (1513 . 1609) (1514 . 1610) (1515 . 1611) (1516 . 1612) (1517 . 1613) (1518 . 1614) (1519 . 1615) (1520 . 1616) (1521 . 1617) (1522 . 1618) (1664 . 1170) (1665 . 1174) (1666 . 1178) (1667 . 1180) (1668 . 1186) (1669 . 1198) (1670 . 1200) (1671 . 1202) (1672 . 1206) (1673 . 1208) (1674 . 1210) (1676 . 1240) (1677 . 1250) (1678 . 1256) (1679 . 1262) (1680 . 1171) (1681 . 1175) (1682 . 1179) (1683 . 1181) (1684 . 1187) (1685 . 1199) (1686 . 1201) (1687 . 1203) (1688 . 1207) (1689 . 1209) (1690 . 1211) (1692 . 1241) (1693 . 1251) (1694 . 1257) (1695 . 1263) (1697 . 1106) (1698 . 1107) (1699 . 1105) (1700 . 1108) (1701 . 1109) (1702 . 1110) (1703 . 1111) (1704 . 1112) (1705 . 1113) (1706 . 1114) (1707 . 1115) (1708 . 1116) (1709 . 1169) (1710 . 1118) (1711 . 1119) (1712 . 8470) (1713 . 1026) (1714 . 1027) (1715 . 1025) (1716 . 1028) (1717 . 1029) (1718 . 1030) (1719 . 1031) (1720 . 1032) (1721 . 1033) (1722 . 1034) (1723 . 1035) (1724 . 1036) (1725 . 1168) (1726 . 1038) (1727 . 1039) (1728 . 1102) (1729 . 1072) (1730 . 1073) (1731 . 1094) (1732 . 1076) (1733 . 1077) (1734 . 1092) (1735 . 1075) (1736 . 1093) (1737 . 1080) (1738 . 1081) (1739 . 1082) (1740 . 1083) (1741 . 1084) (1742 . 1085) (1743 . 1086) (1744 . 1087) (1745 . 1103) (1746 . 1088) (1747 . 1089) (1748 . 1090) (1749 . 1091) (1750 . 1078) (1751 . 1074) (1752 . 1100) (1753 . 1099) (1754 . 1079) (1755 . 1096) (1756 . 1101) (1757 . 1097) (1758 . 1095) (1759 . 1098) (1760 . 1070) (1761 . 1040) (1762 . 1041) (1763 . 1062) (1764 . 1044) (1765 . 1045) (1766 . 1060) (1767 . 1043) (1768 . 1061) (1769 . 1048) (1770 . 1049) (1771 . 1050) (1772 . 1051) (1773 . 1052) (1774 . 1053) (1775 . 1054) (1776 . 1055) (1777 . 1071) (1778 . 1056) (1779 . 1057) (1780 . 1058) (1781 . 1059) (1782 . 1046) (1783 . 1042) (1784 . 1068) (1785 . 1067) (1786 . 1047) (1787 . 1064) (1788 . 1069) (1789 . 1065) (1790 . 1063) (1791 . 1066) (1953 . 902) (1954 . 904) (1955 . 905) (1956 . 906) (1957 . 938) (1959 . 908) (1960 . 910) (1961 . 939) (1963 . 911) (1966 . 901) (1967 . 8213) (1969 . 940) (1970 . 941) (1971 . 942) (1972 . 943) (1973 . 970) (1974 . 912) (1975 . 972) (1976 . 973) (1977 . 971) (1978 . 944) (1979 . 974) (1985 . 913) (1986 . 914) (1987 . 915) (1988 . 916) (1989 . 917) (1990 . 918) (1991 . 919) (1992 . 920) (1993 . 921) (1994 . 922) (1995 . 923) (1996 . 924) (1997 . 925) (1998 . 926) (1999 . 927) (2000 . 928) (2001 . 929) (2002 . 931) (2004 . 932) (2005 . 933) (2006 . 934) (2007 . 935) (2008 . 936) (2009 . 937) (2017 . 945) (2018 . 946) (2019 . 947) (2020 . 948) (2021 . 949) (2022 . 950) (2023 . 951) (2024 . 952) (2025 . 953) (2026 . 954) (2027 . 955) (2028 . 956) (2029 . 957) (2030 . 958) (2031 . 959) (2032 . 960) (2033 . 961) (2034 . 963) (2035 . 962) (2036 . 964) (2037 . 965) (2038 . 966) (2039 . 967) (2040 . 968) (2041 . 969) (2209 . 9143) (2210 . 9484) (2211 . 9472) (2212 . 8992) (2213 . 8993) (2214 . 9474) (2215 . 9121) (2216 . 9123) (2217 . 9124) (2218 . 9126) (2219 . 9115) (2220 . 9117) (2221 . 9118) (2222 . 9120) (2223 . 9128) (2224 . 9132) (2236 . 8804) (2237 . 8800) (2238 . 8805) (2239 . 8747) (2240 . 8756) (2241 . 8733) (2242 . 8734) (2245 . 8711) (2248 . 8764) (2249 . 8771) (2253 . 8660) (2254 . 8658) (2255 . 8801) (2262 . 8730) (2266 . 8834) (2267 . 8835) (2268 . 8745) (2269 . 8746) (2270 . 8743) (2271 . 8744) (2287 . 8706) (2294 . 402) (2299 . 8592) (2300 . 8593) (2301 . 8594) (2302 . 8595) (2528 . 9670) (2529 . 9618) (2530 . 9225) (2531 . 9228) (2532 . 9229) (2533 . 9226) (2536 . 9252) (2537 . 9227) (2538 . 9496) (2539 . 9488) (2540 . 9484) (2541 . 9492) (2542 . 9532) (2543 . 9146) (2544 . 9147) (2545 . 9472) (2546 . 9148) (2547 . 9149) (2548 . 9500) (2549 . 9508) (2550 . 9524) (2551 . 9516) (2552 . 9474) (2721 . 8195) (2722 . 8194) (2723 . 8196) (2724 . 8197) (2725 . 8199) (2726 . 8200) (2727 . 8201) (2728 . 8202) (2729 . 8212) (2730 . 8211) (2732 . 9251) (2734 . 8230) (2735 . 8229) (2736 . 8531) (2737 . 8532) (2738 . 8533) (2739 . 8534) (2740 . 8535) (2741 . 8536) (2742 . 8537) (2743 . 8538) (2744 . 8453) (2747 . 8210) (2748 . 9001) (2749 . 46) (2750 . 9002) (2755 . 8539) (2756 . 8540) (2757 . 8541) (2758 . 8542) (2761 . 8482) (2762 . 9747) (2764 . 9665) (2765 . 9655) (2766 . 9675) (2767 . 9647) (2768 . 8216) (2769 . 8217) (2770 . 8220) (2771 . 8221) (2772 . 8478) (2773 . 8240) (2774 . 8242) (2775 . 8243) (2777 . 10013) (2779 . 9644) (2780 . 9664) (2781 . 9654) (2782 . 9679) (2783 . 9646) (2784 . 9702) (2785 . 9643) (2786 . 9645) (2787 . 9651) (2788 . 9661) (2789 . 9734) (2790 . 8226) (2791 . 9642) (2792 . 9650) (2793 . 9660) (2794 . 9756) (2795 . 9758) (2796 . 9827) (2797 . 9830) (2798 . 9829) (2800 . 10016) (2801 . 8224) (2802 . 8225) (2803 . 10003) (2804 . 10007) (2805 . 9839) (2806 . 9837) (2807 . 9794) (2808 . 9792) (2809 . 9742) (2810 . 8981) (2811 . 8471) (2812 . 8248) (2813 . 8218) (2814 . 8222) (2979 . 60) (2982 . 62) (2984 . 8744) (2985 . 8743) (3008 . 175) (3010 . 8868) (3011 . 8745) (3012 . 8970) (3014 . 95) (3018 . 8728) (3020 . 9109) (3022 . 8869) (3023 . 9675) (3027 . 8968) (3030 . 8746) (3032 . 8835) (3034 . 8834) (3036 . 8867) (3068 . 8866) (3295 . 8215) (3296 . 1488) (3297 . 1489) (3298 . 1490) (3299 . 1491) (3300 . 1492) (3301 . 1493) (3302 . 1494) (3303 . 1495) (3304 . 1496) (3305 . 1497) (3306 . 1498) (3307 . 1499) (3308 . 1500) (3309 . 1501) (3310 . 1502) (3311 . 1503) (3312 . 1504) (3313 . 1505) (3314 . 1506) (3315 . 1507) (3316 . 1508) (3317 . 1509) (3318 . 1510) (3319 . 1511) (3320 . 1512) (3321 . 1513) (3322 . 1514) (3489 . 3585) (3490 . 3586) (3491 . 3587) (3492 . 3588) (3493 . 3589) (3494 . 3590) (3495 . 3591) (3496 . 3592) (3497 . 3593) (3498 . 3594) (3499 . 3595) (3500 . 3596) (3501 . 3597) (3502 . 3598) (3503 . 3599) (3504 . 3600) (3505 . 3601) (3506 . 3602) (3507 . 3603) (3508 . 3604) (3509 . 3605) (3510 . 3606) (3511 . 3607) (3512 . 3608) (3513 . 3609) (3514 . 3610) (3515 . 3611) (3516 . 3612) (3517 . 3613) (3518 . 3614) (3519 . 3615) (3520 . 3616) (3521 . 3617) (3522 . 3618) (3523 . 3619) (3524 . 3620) (3525 . 3621) (3526 . 3622) (3527 . 3623) (3528 . 3624) (3529 . 3625) (3530 . 3626) (3531 . 3627) (3532 . 3628) (3533 . 3629) (3534 . 3630) (3535 . 3631) (3536 . 3632) (3537 . 3633) (3538 . 3634) (3539 . 3635) (3540 . 3636) (3541 . 3637) (3542 . 3638) (3543 . 3639) (3544 . 3640) (3545 . 3641) (3546 . 3642) (3551 . 3647) (3552 . 3648) (3553 . 3649) (3554 . 3650) (3555 . 3651) (3556 . 3652) (3557 . 3653) (3558 . 3654) (3559 . 3655) (3560 . 3656) (3561 . 3657) (3562 . 3658) (3563 . 3659) (3564 . 3660) (3565 . 3661) (3568 . 3664) (3569 . 3665) (3570 . 3666) (3571 . 3667) (3572 . 3668) (3573 . 3669) (3574 . 3670) (3575 . 3671) (3576 . 3672) (3577 . 3673) (3745 . 12593) (3746 . 12594) (3747 . 12595) (3748 . 12596) (3749 . 12597) (3750 . 12598) (3751 . 12599) (3752 . 12600) (3753 . 12601) (3754 . 12602) (3755 . 12603) (3756 . 12604) (3757 . 12605) (3758 . 12606) (3759 . 12607) (3760 . 12608) (3761 . 12609) (3762 . 12610) (3763 . 12611) (3764 . 12612) (3765 . 12613) (3766 . 12614) (3767 . 12615) (3768 . 12616) (3769 . 12617) (3770 . 12618) (3771 . 12619) (3772 . 12620) (3773 . 12621) (3774 . 12622) (3775 . 12623) (3776 . 12624) (3777 . 12625) (3778 . 12626) (3779 . 12627) (3780 . 12628) (3781 . 12629) (3782 . 12630) (3783 . 12631) (3784 . 12632) (3785 . 12633) (3786 . 12634) (3787 . 12635) (3788 . 12636) (3789 . 12637) (3790 . 12638) (3791 . 12639) (3792 . 12640) (3793 . 12641) (3794 . 12642) (3795 . 12643) (3796 . 4520) (3797 . 4521) (3798 . 4522) (3799 . 4523) (3800 . 4524) (3801 . 4525) (3802 . 4526) (3803 . 4527) (3804 . 4528) (3805 . 4529) (3806 . 4530) (3807 . 4531) (3808 . 4532) (3809 . 4533) (3810 . 4534) (3811 . 4535) (3812 . 4536) (3813 . 4537) (3814 . 4538) (3815 . 4539) (3816 . 4540) (3817 . 4541) (3818 . 4542) (3819 . 4543) (3820 . 4544) (3821 . 4545) (3822 . 4546) (3823 . 12653) (3824 . 12657) (3825 . 12664) (3826 . 12671) (3827 . 12673) (3828 . 12676) (3829 . 12678) (3830 . 12685) (3831 . 12686) (3832 . 4587) (3833 . 4592) (3834 . 4601) (3839 . 8361) (5052 . 338) (5053 . 339) (5054 . 376) (8352 . 8352) (8353 . 8353) (8354 . 8354) (8355 . 8355) (8356 . 8356) (8357 . 8357) (8358 . 8358) (8359 . 8359) (8360 . 8360) (8362 . 8362) (8363 . 8363) (8364 . 8364)) defalias x-cut-buffer-or-selection-value x-selection-value nil make-obsolete "24.1"] 6)
#@68 Insert the clipboard contents, or the last stretch of killed text.
(defalias 'x-clipboard-yank #[0 "\301\302!\303\211\203 \211G\304V\203 \305!\210\306 )\207" [select-enable-clipboard gui--selection-value-internal CLIPBOARD t 0 kill-new yank] 3 (#$ . 18491) "*"])
(make-obsolete 'x-clipboard-yank 'clipboard-yank "25.1")
#@92 Open the menu bar if it is shown.
`popup-menu' is used if it is off.
(fn &optional FRAME)
(defalias 'x-menu-bar-open #[256 "\301\302\303\"\206 \304\304U\204 \305\306!\203 \306!\207\307\310 \"\207" [last-nonmenu-event frame-parameter nil menu-bar-lines 0 fboundp accelerate-menu popup-menu mouse-menu-bar-map] 4 (#$ . 18821) "i"])
#@102 Report an error when a suspend is attempted.
This returns an error if any Emacs frames are X frames.
(defalias 'x-win-suspend-error #[0 "\300\301\302\303 \">\205
\304\305!\207" [x mapcar window-system frame-list error "Cannot suspend Emacs while an X GUI frame exists"] 4 (#$ . 19164)])
#@54 Non-nil if the X window system has been initialized.
(defvar x-initialized nil (#$ . 19458))
(byte-code "\301\302\303\304\303\305%\210\306\307\310\"\210\301\311\303\312\303\313%\210\301\314\303\315\303\316%\210\301\317\303\320\303\321%\210\301\322\303\323\303\324%\210\301\325\303\326\303\327%\210\301\330\303\331\303\332%\210\333\334\335\"\210\336\337\340#\210\341\342\343\344\345DD\346\347\350\351\352\353\354& \210\341\355\343\344\356DD\357\347\350\351\360\353\354& \207" [special-event-map cl-generic-define-method window-system-initialization nil (&context (window-system x) &optional display) #[256 "\203 \306\307!\210 ;\204% \310\311\n!\312\313 \"\211\262\203$ \314I\210\202 \210\315\2067 \316\317\320 \"\2065 \316\317!\211\f
\321=#\210\322 \210\3231M \324<\325\"0\202W \326\327\330\331\"\332#\262\210\333 \210\334\335\336\"\337\232\203i \340\341\342\"\210\334\343\344\"\310\203\301 \345!\262\346\236\204\203 \347\236\203\212 \350\351BB\262\352=\"=\353\236\203\251 \353>\236\204\251 \353\211\236AB>B>\354\236\203\301 \354>\236\204\301 \354\211\236AB>B>\266\325 ?\334\355\356\"\211\203\333 \312\357\"\203\333 \360>B>\210)\334\361\362\"\211\203\353 \363!\202\354 \364@\210\365\366\367\"\210\365\370\371\"\210\325A\372 \210\373 \210\325\211\207" [x-initialized x-resource-name invocation-name x-display-name x-command-line-resources initial-window-system cl--assertion-failed (not x-initialized) nil copy-sequence string-match "[.*]" 45 x-open-connection getenv "DISPLAY" selected-frame x create-default-fontset (error) create-fontset-from-fontset-spec t display-warning initialization format "Creation of the standard fontset failed: %s" :error create-fontset-from-x-resource x-get-resource "verticalScrollBars" "ScrollBars" "right" customize-set-variable scroll-bar-mode right "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" string-to-number 5000 add-hook suspend-hook x-win-suspend-error after-init-hook x-wm-set-size-hint menu-bar-enable-clipboard x-apply-session-resources standard-fontset-spec initial-frame-alist default-frame-alist case-fold-search x-selection-timeout split-window-keep-point] 7 "Initialize Emacs for X frames and open the first connection to an X server.\n\n(fn &optional DISPLAY)"] add-to-list display-format-alist ("\\`[^:]*:[0-9]+\\(\\.[0-9]+\\)?\\'" . x) handle-args-function (args &context (window-system x)) #[257 "\300!\207" [x-handle-args] 3 "\n\n(fn ARGS)"] frame-creation-function (params &context (window-system x)) #[257 "\300!\207" [x-create-frame-with-faces] 3 "\n\n(fn PARAMS)"] gui-backend-set-selection (selection value &context (window-system x)) #[514 "\211\203 \300\"\207\301!\207" [x-own-selection-internal x-disown-selection-internal] 5 "\n\n(fn SELECTION VALUE)"] gui-backend-selection-owner-p (selection &context (window-system x)) #[257 "\300!\207" [x-selection-owner-p] 3 "\n\n(fn SELECTION)"] gui-backend-selection-exists-p (selection &context (window-system x)) #[257 "\300!\207" [x-selection-exists-p] 3 "\n\n(fn SELECTION)"] gui-backend-get-selection (selection-symbol target-type &context (window-system x) &optional time-stamp terminal) #[1026 "\300$\207" [x-get-selection-internal] 9 "\n\n(fn SELECTION-SYMBOL TARGET-TYPE &optional TIME-STAMP TERMINAL)"] add-hook after-make-frame-functions x-dnd-init-frame define-key [drag-n-drop] x-dnd-handle-drag-n-drop-event custom-declare-variable x-gtk-stock-map funcall function #[0 "\300\301\302\"\207" [mapcar #[257 "\300@!\300A!B\207" [purecopy] 4 "\n\n(fn ARG)"] (("etc/images/new" "document-new" "gtk-new") ("etc/images/open" "document-open" "gtk-open") ("etc/images/diropen" . "n:system-file-manager") ("etc/images/close" "window-close" "gtk-close") ("etc/images/save" "document-save" "gtk-save") ("etc/images/saveas" "document-save-as" "gtk-save-as") ("etc/images/undo" "edit-undo" "gtk-undo") ("etc/images/cut" "edit-cut" "gtk-cut") ("etc/images/copy" "edit-copy" "gtk-copy") ("etc/images/paste" "edit-paste" "gtk-paste") ("etc/images/search" "edit-find" "gtk-find") ("etc/images/print" "document-print" "gtk-print") ("etc/images/preferences" "preferences-system" "gtk-preferences") ("etc/images/help" "help-browser" "gtk-help") ("etc/images/left-arrow" "go-previous" "gtk-go-back") ("etc/images/right-arrow" "go-next" "gtk-go-forward") ("etc/images/home" "go-home" "gtk-home") ("etc/images/jump-to" "go-jump" "gtk-jump-to") ("etc/images/index" . "gtk-index") ("etc/images/exit" "application-exit" "gtk-quit") ("etc/images/cancel" . "gtk-cancel") ("etc/images/info" "dialog-information" "gtk-info") ("etc/images/bookmark_add" . "n:bookmark_add") ("etc/images/attach" . "gtk-attach") ("etc/images/connect" . "gtk-connect") ("etc/images/contact" . "gtk-contact") ("etc/images/delete" "edit-delete" "gtk-delete") ("etc/images/describe" "document-properties" "gtk-properties") ("etc/images/disconnect" . "gtk-disconnect") ("etc/images/lock-broken" . "gtk-lock_broken") ("etc/images/lock-ok" . "gtk-lock_ok") ("etc/images/lock" . "gtk-lock") ("etc/images/next-page" . "gtk-next-page") ("etc/images/refresh" "view-refresh" "gtk-refresh") ("etc/images/sort-ascending" "view-sort-ascending" "gtk-sort-ascending") ("etc/images/sort-column-ascending" . "gtk-sort-column-ascending") ("etc/images/sort-criteria" . "gtk-sort-criteria") ("etc/images/sort-descending" "view-sort-descending" "gtk-sort-descending") ("etc/images/sort-row-ascending" . "gtk-sort-row-ascending") ("images/gnus/toggle-subscription" . "gtk-task-recurring") ("images/mail/compose" . "gtk-mail-compose") ("images/mail/copy" . "gtk-mail-copy") ("images/mail/forward" . "gtk-mail-forward") ("images/mail/inbox" . "gtk-inbox") ("images/mail/move" . "gtk-mail-move") ("images/mail/not-spam" . "gtk-not-spam") ("images/mail/outbox" . "gtk-outbox") ("images/mail/reply-all" . "gtk-mail-reply-to-all") ("images/mail/reply" . "gtk-mail-reply") ("images/mail/save-draft" . "gtk-mail-handling") ("images/mail/send" . "gtk-mail-send") ("images/mail/spam" . "gtk-spam") ("images/gud/break" . "gtk-no") ("images/gud/recstart" "media-record" "gtk-media-record") ("images/gud/recstop" "media-playback-stop" "gtk-media-stop"))] 3] "How icons for tool bars are mapped to Gtk+ stock items.\nEmacs must be compiled with the Gtk+ toolkit for this to have any effect.\nA value that begins with n: denotes a named icon instead of a stock icon." :version "22.2" :type (choice (repeat (choice symbol (cons (string :tag "Emacs icon") (choice (group (string :tag "Named") (string :tag "Stock")) (string :tag "Stock/named")))))) :group x icon-map-list #[0 "\300\207" [(x-gtk-stock-map)] 1] "A list of alists that map icon file names to stock/named icons.\nThe alists are searched in the order they appear. The first match is used.\nThe keys in the alists are file names without extension and with two directory\ncomponents. For example, to map /usr/share/emacs/22.1.1/etc/images/open.xpm\nto stock item gtk-open, use:\n\n (\"etc/images/open\" . \"gtk-open\")\n\nThemes also have named icons. To map to one of those, use n: before the name:\n\n (\"etc/images/diropen\" . \"n:system-file-manager\")\n\nThe list elements are either the symbol name for the alist or the\nalist itself.\n\nIf you don't want stock icons, set the variable to nil." (choice (const :tag "Don't use stock icons" nil) (repeat (choice symbol (cons (string :tag "Emacs icon") (string :tag "Stock/named")))))] 10)
(defconst x-gtk-stock-cache (make-hash-table :weakness t :test 'equal))
#@133 Map icon with file name FILE to a Gtk+ stock name.
This uses `icon-map-list' to map icon file names to stock icon names.
(fn FILE)
(defalias 'x-gtk-map-stock #[257 "\211;\205a \302\"\206a \303\304 \305\306\307\310\311!\312\"\313$\216\314!\315\316\"\205* \317\320\" \321\211\211\204T \203T @\262\322\206? 9\203I J\202J \"\262A\262\202- \211\205Z \211A\266\205)\262#\207" [x-gtk-stock-cache icon-map-list gethash puthash match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 file-name-sans-extension string-match "/\\([^/]+/[^/]+/[^/]+$\\)" match-string 1 nil assoc-string] 12 (#$ . 27090)])
(byte-code "\300\301\302\"\210\303\304!\210\303\305!\207" [global-set-key [XF86WakeUp] ignore provide x-win term/x-win] 3)
Zerion Mini Shell 1.0