equal
deleted
inserted
replaced
60 ;; Set following in ~/.emacs-auth: |
60 ;; Set following in ~/.emacs-auth: |
61 ;; (setq user-full-name "Oleksandr Gavenko") |
61 ;; (setq user-full-name "Oleksandr Gavenko") |
62 ;; (setq user-mail-address "gavenkoa@gmail.com") |
62 ;; (setq user-mail-address "gavenkoa@gmail.com") |
63 ;; (setq user-nick "gavenkoa") |
63 ;; (setq user-nick "gavenkoa") |
64 |
64 |
|
65 (unless (and (boundp 'user-nick) (stringp user-nick)) |
|
66 (setq user-nick (user-login-name)) ) |
65 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">")) |
67 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">")) |
66 |
68 |
67 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
69 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
68 (message "my defun, defmacro, defvar") |
70 (message "my defun, defmacro, defvar") |
69 |
71 |
1070 (message "dict, dictd, dictionary") |
1072 (message "dict, dictd, dictionary") |
1071 |
1073 |
1072 (when (fboundp 'dict-c5-mode) |
1074 (when (fboundp 'dict-c5-mode) |
1073 (add-to-list 'auto-mode-alist '("\\.dict-c5$" . dict-c5-mode)) |
1075 (add-to-list 'auto-mode-alist '("\\.dict-c5$" . dict-c5-mode)) |
1074 ) |
1076 ) |
|
1077 |
|
1078 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
1079 (message "figlet") |
|
1080 |
|
1081 (defun my-figlet-region (&optional b e) |
|
1082 (interactive "r") |
|
1083 (shell-command-on-region b e "figlet" (current-buffer) t) |
|
1084 (comment-region (mark) (point))) |
1075 |
1085 |
1076 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1086 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1077 (message "remember-mode") |
1087 (message "remember-mode") |
1078 |
1088 |
1079 (when (>= emacs-major-version 23) |
1089 (when (>= emacs-major-version 23) |
1823 |
1833 |
1824 (setq c-echo-syntactic-information-p t) |
1834 (setq c-echo-syntactic-information-p t) |
1825 |
1835 |
1826 (defun my-c-mode-common-hook () |
1836 (defun my-c-mode-common-hook () |
1827 ;; Automatically inserte newlines after special characters such as brace, comma, semi-colon, and colon. |
1837 ;; Automatically inserte newlines after special characters such as brace, comma, semi-colon, and colon. |
1828 (c-toggle-auto-newline 1) |
1838 (c-toggle-auto-newline -1) |
1829 ;; Delete all preceding whitespace by DEL. |
1839 ;; Delete all preceding whitespace by DEL. |
1830 (c-toggle-hungry-state -1) |
1840 (c-toggle-hungry-state -1) |
1831 ;; Auto indent after typing colon according to `c-hanging-colons-alist'. |
1841 ;; Auto indent after typing colon according to `c-hanging-colons-alist'. |
1832 (c-toggle-electric-state -1) |
1842 (c-toggle-electric-state 1) |
1833 ) |
1843 ) |
1834 (add-hook 'c-mode-common-hook 'my-c-mode-common-hook) |
1844 (add-hook 'c-mode-common-hook 'my-c-mode-common-hook) |
1835 |
1845 |
1836 (defconst my-c-style |
1846 (defconst my-c-style |
1837 '((c-tab-always-indent . t) |
1847 '((c-tab-always-indent . t) |