;ELC
;;; Compiled by mockbuild@builder3.centos.org on Sat Jan  6 14:06:32 2007
;;; from file /builddir/build/BUILD/desktop-file-utils-0.10/misc/elc.16794/desktop-entry-mode.el
;;; in Emacs version 21.4.1
;;; 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 "`desktop-entry-mode.el' was compiled for Emacs 19.29 or later"))

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


#@34 Version of `desktop-entry-mode'.
(defconst desktop-entry-mode-version "0.94 (spec 0.9.4)" (#$ . 673))
(custom-declare-group 'desktop-entry nil "Support for editing freedesktop.org desktop entry files." :group 'languages)
#@46 *Command for validating desktop entry files.
(custom-declare-variable 'desktop-entry-validate-command '"desktop-file-validate" '(#$ . -900) :type 'string :group 'desktop-entry)
(byte-code "\300\301\302\303\304\305\306\307\306\310&	\210\311\312\313\314\306\301%\210\311\315\316\317\306\301%\210\311\320\321\322\306\301%\207" [custom-declare-group desktop-entry-faces nil "Font lock faces for `desktop-entry-mode'." :prefix "desktop-entry-" :group 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-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 "\\(?:\\<\\(Actions\\|C\\(?:ategories\\|omment\\)\\|D\\(?:ev\\|ocPath\\)\\|E\\(?:ncoding\\|xec\\)\\|F\\(?:SType\\|ilePattern\\)\\|GenericName\\|Hidden\\|I\\(?:con\\|nitialPreference\\)\\|KeyWords\\|M\\(?:imeType\\|ountPoint\\)\\|N\\(?:ame\\|o\\(?:Display\\|tShowIn\\)\\)\\|OnlyShowIn\\|Path\\|ReadOnly\\|S\\(?:erviceTypes\\|ortOrder\\|tartup\\(?:Notify\\|WMClass\\)\\|wallow\\(?:Exec\\|Title\\)\\)\\|T\\(?:erminal\\|ryExec\\|ype\\)\\|U\\(?:RL\\|nmountIcon\\)\\|Version\\)\\>\\|X-[A-Za-z0-9-]+\\)" (#$ . 2040))
#@62 Regular expression for matching desktop entry group headers.
(defconst desktop-entry-group-header-re "^\\[\\(X-[^][]+\\|\\(?:Desktop \\(?:Entry\\|Action [a-zA-Z]+\\)\\)\\)\\]" (#$ . 2633))
#@54 Highlighting rules for `desktop-entry-mode' buffers.
(defconst desktop-entry-font-lock-keywords (byte-code "\302\303B\304P\305B	\306B\307\310B\311\312B\257\207" [desktop-entry-keywords desktop-entry-group-header-re "^\\s-*#.*$" (0 'font-lock-comment-face) "^" (0 'font-lock-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))] 6) (#$ . 2828))
#@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) (#$ . 3362))
#@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 "\305\306!\307L\210\305\310!\311	QL\210\305\312!\313L\210\305\314!\315L\210\305\316!\317L\210\305\320!\321L\210\322\323\305\306!\fL\210\324\325!\204=\305\326!\327L\210\330\331!\207" [desktop-entry-validate-command buffer-file-name major-mode mode-name desktop-entry-imenu-generic-expression make-local-variable imenu-generic-expression ((nil "^\\s-*\\(.*\\)\\s-*=" 1)) compile-command " " compilation-buffer-name-function #[(x) "\301\302!\303Q\207" [buffer-file-name "*desktop-file-validate " file-name-nondirectory "*"] 3] comment-start "# " comment-end "" comment-start-skip "#+ *" desktop-entry-mode "Desktop Entry" featurep xemacs font-lock-defaults (desktop-entry-font-lock-keywords) run-hooks desktop-entry-mode-hook] 4 (#$ . 3585) nil])
#@47 Validate desktop entry in the current buffer.
(defalias 'desktop-entry-validate #[nil "\301\302!\210\302!\207" [compile-command require compile] 2 (#$ . 4770) nil])
(provide 'desktop-entry-mode)