Gecko [ goons4good.org ]

Name	Size	Permission	Date	Action
desktop-entry-mode.el	7.63 KB	-rw-r--r--	2015-10-27 13:09
desktop-entry-mode.elc	5.5 KB	-rw-r--r--	2019-08-08 19:09

Rename

;ELC���
;;; Compiled by mockbuild@x86-01.bsys.centos.org on Thu Aug  8 23:09:02 2019
;;; from file /builddir/build/BUILD/desktop-file-utils-0.23/misc/desktop-entry-mode.el
;;; in Emacs version 24.3.1
;;; 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.

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

#@34 Version of `desktop-entry-mode'.
(defconst desktop-entry-mode-version "1.0 (spec 1.0)" (#$ . 561))
(byte-code "\300\301\302\303\304\305%\210\306\307\310\311\312\313\304\301&\210\300\314\302\315\316\317\304\301\304\320&	\210\321\322\323\324\304\314%\210\321\325\326\327\304\314%\210\321\330\331\332\304\314%\210\321\333\334\335\304\314%\210\321\336\337\340\304\314%\207" [custom-declare-group desktop-entry nil "Support for editing freedesktop.org desktop entry files." :group languages custom-declare-variable desktop-entry-validate-command "desktop-file-validate" "*Command for validating desktop entry files." :type string desktop-entry-faces "Font lock faces for `desktop-entry-mode'." :prefix "desktop-entry-" faces custom-declare-face desktop-entry-group-header-face ((((class color) (background light)) (:foreground "mediumblue" :bold t)) (((class color) (background dark)) (:foreground "lightblue" :bold t)) (t (:bold t))) "*Face for highlighting desktop entry group headers." desktop-entry-deprecated-keyword-face ((((class color)) (:background "yellow" :foreground "black" :strikethru t))) "*Face for highlighting deprecated desktop entry keys." desktop-entry-unknown-keyword-face ((((class color)) (:foreground "red3" :underline t)) (t (:underline t))) "*Face for highlighting unknown desktop entry keys." desktop-entry-value-face ((((class color) (background light)) (:foreground "darkgreen")) (((class color) (background dark)) (:foreground "lightgreen"))) "*Face for highlighting desktop entry values." desktop-entry-locale-face ((((class color) (background light)) (:foreground "dimgray")) (((class color) (background dark)) (:foreground "lightgray"))) "*Face for highlighting desktop entry locales."] 10)
#@45 Expression for matching desktop entry keys.
(defconst desktop-entry-keywords "\$?:\\<\\(C\\(?:ategories\\|omment\$\\|D\$?:ev\\|ocPath\$\\|Exec\\|FSType\\|GenericName\\|Hidden\\|I\$?:con\\|nitialPreference\$\\|KeyWords\\|M\$?:imeType\\|ountPoint\$\\|N\$?:ame\\|o\\(?:Display\\|tShowIn\$\\)\\|OnlyShowIn\\|Path\\|ReadOnly\\|S\$?:erviceTypes\\|tartup\\(?:Notify\\|WMClass\$\\)\\|T\$?:erminal\\|ryExec\\|ype\$\\|U\$?:RL\\|nmountIcon\$\\|Version\\)\\>\\|X-[A-Za-z0-9-]+\\)" (#$ . 2288))
#@56 Expression for matching deprecated desktop entry keys.
(defconst desktop-entry-deprecated-keywords "\$\\<Type\\s-*=\\s-*MimeType\\>\\|\\<\\(BinaryPattern\\|DefaultApp\\|E\\(?:ncoding\\|xtensions\$\\|FilePattern\\|M\$?:apNotify\\|iniIcon\$\\|P\$?:\\(?:attern\\|rotocol\$s\\)\\|S\$?:ortOrder\\|wallow\\(?:Exec\\|Title\$\\)\\|TerminalOptions\\)\\>\\)" (#$ . 2792))
#@62 Regular expression for matching desktop entry group headers.
(defconst desktop-entry-group-header-re "^\\[\$X-[^][]+\\|\\(?:Desktop \\(?:Entry\\|Action [a-zA-Z]+\$\\)\\)\\]" (#$ . 3168))
#@54 Highlighting rules for `desktop-entry-mode' buffers.
(defconst desktop-entry-font-lock-keywords (byte-code "\303\304B\305P\306B\305	P\307B\310\311B\n\312B\313\314B\315\316B\257\207" [desktop-entry-deprecated-keywords desktop-entry-keywords desktop-entry-group-header-re "^\\s-*#.*$" (0 'font-lock-comment-face) "^" (0 'desktop-entry-deprecated-keyword-face) (0 'font-lock-keyword-face) "^[A-Za-z0-9-]+" (0 'desktop-entry-unknown-keyword-face) (1 'desktop-entry-group-header-face) "^[A-Za-z0-9-]+?\\s-*=\\s-*\$.*\$" (1 'desktop-entry-value-face) "^[A-Za-z0-9-]+?\\[\$[^]]+\$\\]\\s-*=\\s-*\$.*\$" ((1 'desktop-entry-locale-face) (2 'desktop-entry-value-face))] 8) (#$ . 3363))
#@84 Imenu generic expression for `desktop-entry-mode'.
See `imenu-generic-expression'.
(defvar desktop-entry-imenu-generic-expression (byte-code "\301\302BBC\207" [desktop-entry-group-header-re nil (1)] 3) (#$ . 4052))
#@395 Major mode for editing freedesktop.org desktop entry files.
See <http://www.freedesktop.org/Standards/desktop-entry-spec> for more
information.  See `desktop-entry-mode-version' for information about which
version of the specification this mode is up to date with.

Turning on desktop entry mode calls the value of the variable
`desktop-entry-mode-hook' with no args, if that value is non-nil.
(defalias 'desktop-entry-mode #[nil "\306\300!\210\307\306\303!\210	\310\nQ\306\304!\210\311\306\305!\210\312\306\313!\210\314\306\315!\210\316
\317\320\306\300!\210\306\321!\210\322\323\324!\207" [imenu-generic-expression desktop-entry-validate-command buffer-file-name compile-command compilation-buffer-name-function comment-start make-local-variable ((nil "^\\s-*\$.*\$\\s-*=" 1)) " " #[(x) "\301\302!\303Q\207" [buffer-file-name "*desktop-file-validate " file-name-nondirectory "*"] 3] "# " comment-end "" comment-start-skip "#+ *" desktop-entry-mode "Desktop Entry" font-lock-defaults (desktop-entry-font-lock-keywords) run-hooks desktop-entry-mode-hook major-mode mode-name desktop-entry-imenu-generic-expression] 3 (#$ . 4275) nil])
#@47 Validate desktop entry in the current buffer.
(defalias 'desktop-entry-validate #[nil "\301\302!\210\302!\207" [compile-command require compile] 2 (#$ . 5435) nil])
(provide 'desktop-entry-mode)