Server IP : 111.118.215.189 / Your IP : 18.117.158.174 Web Server : Apache System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 User : a1673wkz ( 2475) PHP Version : 8.2.25 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON Directory (0755) : /usr/share/emacs/24.3/lisp/textmodes/ |
[ Home ] | [ C0mmand ] | [ Upload File ] |
---|
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:47 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/textmodes/css-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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (custom-declare-group 'css nil "Cascading Style Sheets (CSS) editing mode." :group 'languages) (defalias 'css-extract-keyword-list #[257 "\300\301!r\211q\210\302\303\304\305\306\307!\310\"\311\312%DC\216\313\314!\210db\210\315\316!\210\317y\210e`|\210\317\211\211\203^ \211@eb\210\317\262\320A\317\321#\203L \322\323!B\262\2029 \211@\324\325\"BB\262A\266\202\202- \210\237\266\202*\207" [generate-new-buffer " *temp*" funcall make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 "\n\n(fn)" url-insert-file-contents "http://www.w3.org/TR/REC-CSS2/css2.txt" search-backward "Appendix H. Index" nil re-search-forward t match-string 1 sort string-lessp] 10 "\n\n(fn RES)"]) (defalias 'css-extract-parse-val-grammar #[514 "\300\301\211\302\303#\203S \300\225\262\304\305\"\211\262\203% \306!B\262\202 \304\307\"\211\262\203@ \310\311\312\"A\"!\262\202 \304\313\"\211\262\203 \211B\262\202 \207" [0 nil string-match "\\(?:<a [^>]+><span [^>]+>\\(?:<\\([^&]+\\)>\\|'\\([^']+\\)'\\)</span></a>\\|\\(\\[\\)\\|\\(]\\)\\|\\(||\\)\\|\\(|\\)\\|\\([*+?]\\)\\|\\({[^}]+}\\)\\|\\(\\w+\\(?:-\\w+\\)*\\)\\)[ \n]*" match-string-no-properties 1 intern 2 delete-dups append assoc 9] 10 "\n\n(fn STRING ENV)"]) (defalias 'css-extract-props-and-vals #[0 "\300\301!r\211q\210\302\303\304\305\306\307!\310\"\311\312%DC\216\313\314!\210eb\210\315\316\317\315\320#\203L \321\322!\212\304\225b\210\323\324!\210`\316\325!\210\304\224{\326\"BB\262\210)\210\202 \211\262*\207" [generate-new-buffer " *temp*" funcall make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 "\n\n(fn)" url-insert-file-contents "http://www.w3.org/TR/CSS21/propidx.html" nil re-search-forward "#propdef-\\([^\"]+\\)\"><span class=\"propinst-\\1 xref\">'\\1'</span></a>" t match-string-no-properties 1 search-forward "<td>" "[ \n]+|[ \n]+<a href=\"cascade.html#value-def-inherit\" class=\"noxref\"><span class=\"value-inst-inherit\">inherit</span></a>" css-extract-parse-val-grammar] 8 "\n\n(fn)"]) #@53 Identifiers for pseudo-elements and pseudo-classes. (defconst css-pseudo-ids '("active" "after" "before" "first" "first-child" "first-letter" "first-line" "focus" "hover" "lang" "left" "link" "right" "visited") (#$ . 2638)) #@43 Identifiers that appear in the form @foo. (defconst css-at-ids '("charset" "font-face" "import" "media" "page") (#$ . 2868)) #@35 Identifiers for font descriptors. (defconst css-descriptor-ids '("ascent" "baseline" "bbox" "cap-height" "centerline" "definition-src" "descent" "font-family" "font-size" "font-stretch" "font-style" "font-variant" "font-weight" "mathline" "panose-1" "slope" "src" "stemh" "stemv" "topline" "unicode-range" "units-per-em" "widths" "x-height") (#$ . 2999)) #@33 Identifiers for types of media. (defconst css-media-ids '("all" "aural" "bitmap" "continuous" "grid" "paged" "static" "tactile" "visual") (#$ . 3360)) #@29 Identifiers for properties. (defconst css-property-ids '("azimuth" "background" "background-attachment" "background-color" "background-image" "background-position" "background-repeat" "block" "border" "border-bottom" "border-bottom-color" "border-bottom-style" "border-bottom-width" "border-collapse" "border-color" "border-left" "border-left-color" "border-left-style" "border-left-width" "border-right" "border-right-color" "border-right-style" "border-right-width" "border-spacing" "border-style" "border-top" "border-top-color" "border-top-style" "border-top-width" "border-width" "bottom" "caption-side" "clear" "clip" "color" "compact" "content" "counter-increment" "counter-reset" "cue" "cue-after" "cue-before" "cursor" "dashed" "direction" "display" "dotted" "double" "elevation" "empty-cells" "float" "font" "font-family" "font-size" "font-size-adjust" "font-stretch" "font-style" "font-variant" "font-weight" "groove" "height" "hidden" "inline" "inline-table" "inset" "left" "letter-spacing" "line-height" "list-item" "list-style" "list-style-image" "list-style-position" "list-style-type" "margin" "margin-bottom" "margin-left" "margin-right" "margin-top" "marker-offset" "marks" "max-height" "max-width" "min-height" "min-width" "orphans" "outline" "outline-color" "outline-style" "outline-width" "outset" "overflow" "padding" "padding-bottom" "padding-left" "padding-right" "padding-top" "page" "page-break-after" "page-break-before" "page-break-inside" "pause" "pause-after" "pause-before" "pitch" "pitch-range" "play-during" "position" "quotes" "richness" "ridge" "right" "run-in" "size" "solid" "speak" "speak-header" "speak-numeral" "speak-punctuation" "speech-rate" "stress" "table" "table-caption" "table-cell" "table-column" "table-column-group" "table-footer-group" "table-header-group" "table-layout" "table-row" "table-row-group" "text-align" "text-decoration" "text-indent" "text-shadow" "text-transform" "top" "unicode-bidi" "vertical-align" "visibility" "voice-family" "volume" "white-space" "widows" "width" "word-spacing" "z-index") (#$ . 3517)) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable css-electric-keys funcall function #[0 "\300\207" [(125 59)] 1 "\n\n(fn)"] "Self inserting keys which should trigger re-indentation." :version "22.2" :type (repeat character) :options ((125 59)) :group css] 12) (defvar css-mode-syntax-table (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\301\310\307#\210\301\311\312#\210\301\313\314#\210\301\315\316#\210\301\317\320#\210\301\321\322#\210\301\323\324#\210\301\325\326#\210\301\327\326#\210\301\330\331#\210\211\207" [make-syntax-table modify-syntax-entry 47 ". 14" 42 ". 23" 34 "\"" 39 123 "(}" 125 "){" 40 "()" 41 ")(" 91 "(]" 93 ")[" 64 "'" 35 45 "_"] 5)) (defconst css-escapes-re "\\\\\\(?:[^ -]\\|[0-9a-fA-F]+[ \n \f]?\\)") (defconst css-nmchar-re (concat "\\(?:[-[:alnum:]]\\|" css-escapes-re "\\)")) (defconst css-nmstart-re (concat "\\(?:[[:alpha:]]\\|" css-escapes-re "\\)")) (defconst css-ident-re (concat css-nmstart-re css-nmchar-re "*")) (defconst css-proprietary-nmstart-re "[-_]\\(?:khtml\\|m\\(?:oz\\|s\\)\\|o\\|webkit\\)-") (defconst css-name-re (concat css-nmchar-re "+")) (byte-code "\300\301\302\303\304\305%\210\300\306\307\310\304\305%\210\300\311\312\313#\207" [custom-declare-face css-selector ((t :inherit font-lock-function-name-face)) "Face to use for selectors." :group css css-property ((t :inherit font-lock-variable-name-face)) "Face to use for properties." css-proprietary-property ((t :inherit (css-property italic))) "Face to use for vendor-specific properties."] 6) (defvar css-font-lock-keywords (byte-code "\305\306P\307B\310\311 \312\"\313Q\314B\315\316\317\n\320\321\f\322\323\260 \324B\257\207" [css-ident-re css-pseudo-ids css-proprietary-nmstart-re css-nmstart-re css-nmchar-re ("!\\s-*important" . font-lock-builtin-face) "@" font-lock-builtin-face "^\\([ ]*[^@:{}\n][^:{}]+\\(?::" regexp-opt t "\\(?:([^)]+)\\)?[^:{\n]*\\)*\\)\\(?:\n[ ]*\\)*{" ((1 'css-selector append)) ("^[ ]*{" (0 (save-excursion (goto-char (match-beginning 0)) (skip-chars-backward " \n ") (put-text-property (point) (match-end 0) 'font-lock-multiline t) nil))) "\\(?:[{;]\\|^\\)[ ]*\\(" "\\(?:\\(" "\\)\\|" "\\)" "*" "\\)\\s-*:" ((1 (if (match-end 2) 'css-proprietary-property 'css-property)))] 13)) (defvar css-font-lock-defaults '(css-font-lock-keywords nil t)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\305\306!\204 \302\306\307\310#\210\300\207" [css-mode-hook variable-documentation put purecopy "Hook run when entering CSS mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp css-mode-map definition-name css-mode] 5) (defvar css-mode-map (make-sparse-keymap)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\305\306!\204 \302\306\307\310#\210\300\207" [css-mode-map variable-documentation put purecopy "Keymap for `css-mode'." boundp css-mode-syntax-table definition-name css-mode] 5) (defvar css-mode-syntax-table (make-syntax-table)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\302\305\306\307#\207" [css-mode-syntax-table variable-documentation put purecopy "Syntax table for `css-mode'." css-mode-abbrev-table definition-name css-mode] 5) (defvar css-mode-abbrev-table (progn (define-abbrev-table 'css-mode-abbrev-table nil) css-mode-abbrev-table)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\302\305\306\307#\207" [css-mode-abbrev-table variable-documentation put purecopy "Abbrev table for `css-mode'." css-mode derived-mode-parent nil] 5) #@150 Major mode to edit Cascading Style Sheets. This mode runs the hook `css-mode-hook', as the final step during initialization. \{css-mode-map} (fn) (defalias 'css-mode #[0 "\306\300!\210\307\310 \210\311\312\313!\210\314\f!\210 #\306\315!\210$ \306\316!\210\317\306\320!\210\321\306\322!\210\323\306\324!\210\325\306\326!\210\327\306\330!\210\307\306\331!\210\332\306\333!\210\334%\203\201 \335\336!\337\"\210%\211\203z \211@\340I\210A\266\202\202h \210\306\336!\210)\341\342!\207" [delay-mode-hooks major-mode mode-name css-mode-map css-mode-syntax-table css-mode-abbrev-table make-local-variable t kill-all-local-variables css-mode "CSS" use-local-map set-syntax-table font-lock-defaults comment-start "/*" comment-start-skip "/\\*+[ ]*" comment-end "*/" comment-end-skip "[ ]*\\*+/" forward-sexp-function css-forward-sexp parse-sexp-ignore-comments indent-line-function css-indent-line fill-paragraph-function css-fill-paragraph make-char-table auto-fill-chars set-char-table-parent indent-according-to-mode run-mode-hooks css-mode-hook local-abbrev-table css-font-lock-defaults css-electric-keys] 6 (#$ . 9194) nil]) (defalias 'css-fill-paragraph #[256 "\212\304 C\305 C\306@8\203l \212\307@8b\210\310\311!\210n?`\240\210)\203l \214\307@8@}\210\312 \210\313\203G \314\315\"\203G \316\317!\320 \321\260\202H \203_ \314\315\"\203_ \316\317!\320\n\321\260\202` \n\322!\210,\323\202\307@8?\205@A@\204\230 \324\325\326\327\330\331\332\"\333\"\334\335%D\336\325\337\324EDC\217\205@A@b\210\212\340\325\341D\336\325\342\340EDC\217)\211\205\343\344\323#\203 \307\304 8\204\260 `Sf\345=\203\332 \212\346u\210\347\313x\210n\204\326 \350 \210)\202\260 \305 \240\210\310\311!\203 `@V\203 \212\310\346!\210`@W\205\374 \350 \210\323)\204\332 `@W\203\260 \350 \210\202\260 @A@b\210\351\352\334!\"\210\323\262\266\202)\207" [comment-continue paragraph-separate paragraph-start fill-paragraph-function syntax-ppss line-end-position 4 8 forward-comment 1 comment-normalize-vars nil string-match "[^ ]" "\\(?:[ ]*" regexp-quote "\\)?\\(?:" "\\)" fill-paragraph t #1=#:err funcall make-byte-code 0 "\302\303!\210`\301@X\205 \300\304 \240\207" vconcat vector [down-list 1 syntax-ppss] 2 "\n\n(fn)" error #[257 "\300\207" [nil] 2 "\n\n(fn IGNORED)"] #2=#:err #[0 "\300\301!\210\302`\303\"\207" [forward-sexp 1 copy-marker t] 3 "\n\n(fn)"] #[257 "\300\207" [nil] 2 "\n\n(fn IGNORED)"] re-search-forward "[{;}]" 125 -1 " " newline indent-region line-beginning-position] 12 "\n\n(fn &optional JUSTIFY)"]) (defconst css-navigation-syntax-table (byte-code "\301!\302\303\304\305\306\307!\310\"\311\312%\"\210\211\207" [css-mode-syntax-table make-syntax-table map-char-table make-byte-code 514 "\211\242\301=\205 \302\300\303AB#\207" vconcat vector [1 set-char-table-range 3] 7 "\n\n(fn C V)"] 8)) (defalias 'css-backward-sexp #[257 "\301\211\302W\203 \303[!\202G \211\302V\205G \211S\262\304d[!\210`Sf\305=\204- \306\307!\210\202 \306\307!\210\212\304d[!\210o\206@ `Sf\310>)\203- \202 )\207" [forward-sexp-function nil 0 css-forward-sexp forward-comment 59 backward-sexp 1 (59 123)] 3 "\n\n(fn N)"]) (defalias 'css-forward-sexp #[257 "\301\211\302W\203 \303[!\202? \211\302V\205? \211S\262\304d!\210\301f\305=\204+ \306\307!\210\202 \306\307!\210\212\304d!\210\301f\310>)\203+ \202 )\207" [forward-sexp-function nil 0 css-backward-sexp forward-comment 59 forward-sexp 1 (59 125)] 3 "\n\n(fn N)"]) (defalias 'css-indent-calculate-virtual #[0 "\212\301\302x\210n)\204# \303\304!\203% \212\305u\210\301\302w\210l\206 \303!)\204% i\207\306 \207" [comment-start-skip " " nil looking-at "\\s(" 1 css-indent-calculate] 2 "\n\n(fn)"]) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \207" [custom-declare-variable css-indent-offset funcall function #[0 "\300\207" [4] 1 "\n\n(fn)"] "Basic size of one indentation step." :version "22.2" :type integer :group css] 10) (defalias 'css-indent-calculate #[0 "\303 \304\305 p\306\307\310\311\312\313\"\314\"\315\316%DC\216\317!\210\212\3208\203( \321\202\363 \3228\203} `\262\323y\210\324\304w\210\3258`Y\203g \3258b\210f\326=\203R \327u\210\202c \330 !\204_ \331\332!\210\202c \310\225b\210i\202\363 f\326=\203y \304f\326=\203y i\202\363 i\202\363 \330\333!\203\217 \327u\210\334\327!\210\335 \206\363 \330 !\203\236 \336d!\210\337 \206\363 \212\336d[!\210`\262hz)\340=\203\342 Sb\210\330\341!\204\277 \331\332!\202\337 \310\225f\342>\204\323 \212\310\225b\210\330 !)\203\332 \335 \n\\\202\337 \310\225b\210i\206\363 \343\327!\210\330\344!\203\361 \337 \202\363 \335 *\266\202\207" [css-navigation-syntax-table comment-start-skip css-indent-offset syntax-ppss nil syntax-table funcall make-byte-code 0 "r\301q\210\302\300!)\207" vconcat vector [set-syntax-table] 2 "\n\n(fn)" set-syntax-table 3 noindent 4 -1 " " 8 42 1 looking-at error "Internal css-mode error" "\\s)" backward-sexp css-indent-calculate-virtual forward-comment css-indent-calculate 40 "\\s([ ]*" (10 nil) css-backward-sexp "\\s("] 12 "\n\n(fn)"]) #@63 Indent current line according to CSS indentation rules. (fn) (defalias 'css-indent-line #[0 "`C\301\302\303\304\305\306\307\310!\311\"\312\313%D\314\303\315\302EDC\217\211\247\204% \316\2025 @\2032 \212\317!)\2025 \317!)\207" [forward-sexp-function nil #1=#:err funcall make-byte-code 0 "\212\301y\210\302\303w\210`\300@Y\203 \300\303\240\210\304 )\207" vconcat vector [0 " " nil css-indent-calculate] 2 "\n\n(fn)" error #[257 "\300\207" [nil] 2 "\n\n(fn IGNORED)"] noindent indent-line-to] 9 (#$ . 14265) nil]) (provide 'css-mode)