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 618 6ad7203ac9dc
parent 581 8497d1849d57
child 647 6ae5399c8087
equal deleted inserted replaced
617:ec1c2838feae 618:6ad7203ac9dc 
    21 ;;   (add-to-list 'auto-mode-alist (cons "\\.gadict$" 'gadict-mode))
 
    21 ;;   (add-to-list 'auto-mode-alist (cons "\\.gadict$" 'gadict-mode))
 
    22 
    22 
    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" "hyper" "hypo")))
 
    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 (defgroup gadict nil
 
    30 (defgroup gadict nil
 
    31   "gadict-mode customization."
 
    31   "gadict-mode customization."
gadict