obsolete/dict-c5-mode.el
author Oleksandr Gavenko <gavenkoa@gmail.com>
Tue, 20 Dec 2011 20:20:14 +0200
changeset 322 aadaac23117a
parent 321 f3927b9e4b02
child 323 1b8d12e8ab76
permissions -rw-r--r--
Remove superfluous argument.

;;; dict-mode.el --- major mode for dict dictionary source files

;; Copyright (C) 2011 by Oleksandr Gavenko <gavenkoa@gmail.com>

;; You can do anything with this file without any warranty.

;; Author: Oleksandr Gavenko <gavenkoa@gmail.com>
;; Maintainer: Oleksandr Gavenko <gavenkoa@gmail.com>
;; Created: 2011-09-04
;; Version: 0.1
;; Keywords: dict, dictionary

;;; Commentary:
;;
;; Very pure release.

;;; Code:

(setq dict-c5-mode-map (make-sparse-keymap))
;; (define-key dict-c5-mode-map (kbd "RET") 'my-xxx)

(require 'generic-x)

;;;###autoload
(define-generic-mode
  'dict-c5-mode
  nil
  nil
  '(
    ("^\\(_\\{5,\\}\\)\n\n\\([^[:blank:]][^\n]*\\)$"
     (1 font-lock-function-name-face) (2 font-lock-keyword-face))
    ("\\[[^]]+]" . font-lock-type-face)
    )
  '("\\.dict-c5$")
  (list
   (lambda nil
     (use-local-map dict-c5-mode-map)
     (modify-syntax-entry ?' ".")
     (modify-syntax-entry ?\" ".")
     ))
  )

;;; dict-mode.el ends here