Mercurial Mercurial > gadict / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
contrib/gadict.el
changeset 579 a426c3ef778c
parent 565 ac68f2680ea0
child 580 f7c1fd21a5dd
equal deleted inserted replaced
578:a2c153889844 579:a426c3ef778c 
    23 ;;; Code:
 
    23 ;;; Code:
 
    24 
    24 
    25 (defconst gadict--art-lang-regex (regexp-opt '("en" "ru" "uk" "la")))
 
    25 (defconst gadict--art-lang-regex (regexp-opt '("en" "ru" "uk" "la")))
 
    26 (defconst gadict--art-rel-regex (regexp-opt '("ant" "syn" "rel" "topic")))
 
    26 (defconst gadict--art-rel-regex (regexp-opt '("ant" "syn" "rel" "topic")))
 
    27 (defconst gadict--art-var-regex (regexp-opt '("v1" "v2" "v3" "s" "pl" "male" "female" "abbr" "comp" "super" "Am" "Br" "Au")))
 
    27 (defconst gadict--art-var-regex (regexp-opt '("v1" "v2" "v3" "s" "pl" "male" "female" "abbr" "comp" "super" "Am" "Br" "Au")))
 
    28 (defconst gadict--art-pos-regex (regexp-opt '("n" "v" "adj" "adv" "pron" "prep" "num" "conj" "int" "phr" "phr\\.v" "contr" "abbr" "prefix")))
 
    28 (defconst gadict--art-pos-regex (regexp-opt '("n" "v" "adj" "adv" "pron" "prep" "num" "conj" "int" "phr" "phr.v" "contr" "abbr" "prefix")))
 
    29 
    29 
    30 (defvar gadict-font-lock-keywords
 
    30 (defvar gadict-font-lock-keywords
 
    31   `( ("^\\(__\\)\n\n\\(\\w.*\\)$" (1 font-lock-function-name-face) (2 font-lock-keyword-face))
 
    31   `( ("^\\(__\\)\n\n\\(\\w.*\\)$" (1 font-lock-function-name-face) (2 font-lock-keyword-face))
 
    32      ("^ .*\n\\(\\w.*\\)" (1 font-lock-keyword-face))
 
    32      ("^ .*\n\\(\\w.*\\)" (1 font-lock-keyword-face))
 
    33      ("^#.*" . font-lock-comment-face)
 
    33      ("^#.*" . font-lock-comment-face)
gadict