Inital commit

.emacs

@@ -0,0 +1,21 @@
+(setq inhibit-modification-hooks nil)
+(defun test-hook-a (change-beg change-end prev-len)
+	 (append-to-file change-beg change-end "xyz.txt"))
+(defun test-hook-b (change-beg change-end)
+	 (append-to-file change-beg change-end "xyz.txt"))
+(defun test-hook-i (num)
+	 (setq x (concat (buffer-substring-no-properties (point-min) (+ (point-min) num)) "0\n"))
+	 (message x)
+	 (write-region x nil "xyz.txt" t)
+	 (point-min))
+(add-hook 'after-change-functions 'test-hook-a)
+(add-hook 'before-change-functions 'test-hook-b)
+;(add-hook 'after-insert-file-functions 'test-hook-i)
+;(autoload 'speechd-speak "speechd-speak" nil t)
+;(speechd-speak)
+;(speechd-set-rate 65)
+;(speechd-set-punctuation-mode "all")
+;(speechd-out-disable-driver "brltty")
+;(setq speechd-speak-echo 'word
+;	speechd-speak-deleted-char t
+;	speechd-speak-whole-line t)