# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1315166978 -10800
# Node ID 4272023569f33e4a21762ebed20249b5466ecfd6
# Parent  75430afe1a430879aeb41970d588eddb2525a330
major mode for dict dictionary source files

diff -r 75430afe1a43 -r 4272023569f3 obsolete/dict-c5-mode.el
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/obsolete/dict-c5-mode.el	Sun Sep 04 23:09:38 2011 +0300
@@ -0,0 +1,46 @@
+;;; 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
+  '(
+    ("^\\(_____+\\)
+
+\\([^[:blank:]][^
+]*\\)$" (1 font-lock-function-name-face) (2 font-lock-keyword-face))
+    ("^[[:blank:]]*\\(\\[[^]]*]\\)[[:space:]]" (1 font-lock-type-face))
+    )
+  '("\\.dict-c5$")
+  nil
+  (list
+   (lambda nil
+     (use-local-map dict-c5-mode-map)
+     (modify-syntax-entry ?' ".")
+     (modify-syntax-entry ?\" ".")
+     ))
+  )
+
+;;; dict-mode.el ends here