css-mode.elc

;ELC
;;; Compiled by ThoughtWorks@MacBookPro6-2-4d-2.local on Sun Feb  5 21:38:58 2012
;;; from file /Users/nford/.emacs.d/elpa/css-mode-1.0/css-mode.el
;;; in Emacs version 23.3.50.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.

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


#@40 Number of spaces for each indent step.
(custom-declare-variable 'css-indent-level '3 '(#$ . 548))
#@21 Keymap in CSS mode.
(defvar css-mode-map nil (#$ . 652))
(byte-code "\204\301 \301\207" [css-mode-map make-sparse-keymap] 1)
#@32 Syntax table used in CSS mode.
(defvar css-mode-syntax-table (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210)\207" [table make-syntax-table modify-syntax-entry 47 ". 14" 42 ". 23" 45 "w"] 4) (#$ . 787))
#@34 Used by `css-re-search-forward'.
(defalias 'css-re-search-forward-inner #[(regexp &optional bound count) "\305e\n\306V\203^\307\f\"\210\310`\"\311	8\203.\307\312\313\311	8!P\212\305\210`)\314#\210\202Y\315	8\203:\305y\210\202Y\316	8\204O`Sf\317=\203V\305f\320=\203V\307\321!\210\202Y\nS`\202*`\207" [saved-point parse count regexp bound nil 0 re-search-forward parse-partial-sexp 3 "\\([^\\]\\|^\\)" string t 7 4 47 42 "\\*/"] 5 (#$ . 1022)])
#@97 Invokes `re-search-forward' but treats the buffer as if strings and
comments have been removed.
(defalias 'css-re-search-forward #[(regexp &optional bound noerror count) "`\204	\303\202\304W\203\305\202\304V\205\306\307\310\311\217*\207" [count search-expr saved-point (css-re-search-forward-inner regexp bound 1) 0 (css-re-search-backward-inner regexp bound (- count)) (css-re-search-forward-inner regexp bound count) err (eval search-expr) ((search-failed (byte-code "b\210	?\205
\303\304\n!!\207" [saved-point noerror err error error-message-string] 3)))] 3 (#$ . 1490)])
#@35 Used by `css-re-search-backward'.
(defalias 'css-re-search-backward-inner #[(regexp &optional bound count) "\305e\n\306V\203_\307\f\"\210\310`\"\311	8\203.\307\312\313\311	8!P\212\314 \210`)\315#\210\202\316	8\203<\317	8b\210\202\320	8\204Q`Sf\321=\203X\305f\322=\203X\307\323!\210\202\nS\211\202*`\207" [saved-point parse count regexp bound nil 0 re-search-backward parse-partial-sexp 3 "\\([^\\]\\|^\\)" string beginning-of-line t 7 8 4 47 42 "/\\*"] 6 (#$ . 2087)])
#@98 Invokes `re-search-backward' but treats the buffer as if strings
and comments have been removed.
(defalias 'css-re-search-backward #[(regexp &optional bound noerror count) "`\204	\303\202\304W\203\305\202\304V\205\306\307\310\311\217*\207" [count search-expr saved-point (css-re-search-backward-inner regexp bound 1) 0 (css-re-search-forward-inner regexp bound (- count)) (css-re-search-backward-inner regexp bound count) err (eval search-expr) ((search-failed (byte-code "b\210	?\205
\303\304\n!!\207" [saved-point noerror err error error-message-string] 3)))] 3 (#$ . 2582)])
(byte-code "\303B\304\305\306\307\310\311FD\312\313	E\314\313\nEE!\210\315B\316!\210\317B\320!\207" [current-load-list font-lock-variable-name-face font-lock-warning-face css-font-lock-keywords-1 (lambda (#1=#:defconst-tmp-var) (defconst css-font-lock-keywords-1 #1#)) "^[ 	]*[[:word:].#:]+[ 	]*\\([,{]\\|/\\*\\|$\\)" "\\([[:word:].#:]+\\)[ 	]*\\(,\\|{.*\\|/\\*.*?\\*/\\|$\\)" (progn (backward-char) (if (nth 1 (parse-partial-sexp (point-min) (point))) (end-of-line) (beginning-of-line))) (end-of-line) (1 font-lock-function-name-face) "\\(\\w+\\)[ 	]*:" 1 ":[ 	]*\\(\\w+[ 	]+\\w+\\)" css-font-lock-keywords-2 (lambda (#2=#:defconst-tmp-var) (defconst css-font-lock-keywords-2 #2#)) css-font-lock-keywords-3 (lambda (#3=#:defconst-tmp-var) (defconst css-font-lock-keywords-3 #3#))] 6)
#@27 See `font-lock-keywords'.
(defconst css-font-lock-keywords '(css-font-lock-keywords-3 css-font-lock-keywords-1 css-font-lock-keywords-2 css-font-lock-keywords-3) (#$ . 3975))
(defalias 'css-indent-line #[nil "\212\305 \210\306e`\"\307\310!\311	8\204\307\312!\203\313 \202V\212\314\315x\205(\307\316!)\2039\212\317\320!\210\313 \n\\)\202V	A@\203U\212	A@b\210\313 \203O\321\202P\n\\)\202V\321+i\313 Z\322\f!\210\321V\205iu*\207" [end-brace-p p css-indent-level offset indent back-to-indentation parse-partial-sexp looking-at "}" 8 "/[/*]" current-indentation " 	\n:," nil "[:,]" css-re-search-backward "^[ 	]*\\w" 0 indent-line-to] 3 nil nil])
#@58 Regular expression matching any selector. Used by imenu.
(defconst css-imenu-generic-expression '((nil "^[ 	]*\\([[:word:].:#, 	]+\\)\\s-*{" 1)) (#$ . 4643))
#@73 Major mode for editing CSS source code.

Key bindings:

\{css-mode-map}
(defalias 'css-mode #[nil "\306 \210\307!\210\310	!\210\311\302!\210\312\311\304!\210C\313\311\314!\210\"\f\315\316!\203S\311\317!\210\320\311\321!\210\322\311\323!\210\324\311\325!\210\326\327\330!\210\331\332\333\334\313$\210\335\332!\210\336#\337$\340\341!\207" [css-mode-map css-mode-syntax-table indent-line-function css-font-lock-keywords font-lock-defaults imenu-case-fold-search kill-all-local-variables use-local-map set-syntax-table make-local-variable css-indent-line nil imenu-generic-expression featurep newcomment comment-start "/*" comment-end "*/" comment-start-skip "/\\*+ *" comment-end-skip " *\\*+/" require advice ad-add-advice comment-dwim (inhibit-indent nil t (advice lambda nil "Indent new comment lines to column zero and insert only one space\nbefore a trailing comment." (when (eq major-mode 'css-mode) (let ((prs (parse-partial-sexp (save-excursion (beginning-of-line) (point)) (point)))) (when (nth 4 prs) (save-excursion (goto-char (nth 8 prs)) (when (looking-at "/\\*[ 	]*\\*/") (if (= (current-column) (current-indentation)) (indent-line-to 0) (just-one-space))))))))) after ad-activate css-mode "CSS" run-hooks css-mode-hook css-imenu-generic-expression major-mode mode-name] 5 (#$ . 4807) nil])
(provide 'css-mode)