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 |