equal
deleted
inserted
replaced
21 ;;; ---------------------------------------------------------------- |
21 ;;; ---------------------------------------------------------------- |
22 ;;; user info. |
22 ;;; user info. |
23 |
23 |
24 (setq user-full-name "Oleksandr Gavenko") |
24 (setq user-full-name "Oleksandr Gavenko") |
25 (setq user-mail-address "gavenkoa@gmail.com") |
25 (setq user-mail-address "gavenkoa@gmail.com") |
|
26 (setq user-nick "gavenkoa") |
26 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">")) |
27 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">")) |
27 |
28 |
28 ;;; ---------------------------------------------------------------- |
29 ;;; ---------------------------------------------------------------- |
29 ;;; mode groups. |
30 ;;; mode groups. |
30 |
31 |
971 |
972 |
972 (add-hook 'rcirc-mode-hook (lambda () (rcirc-track-minor-mode 1))) |
973 (add-hook 'rcirc-mode-hook (lambda () (rcirc-track-minor-mode 1))) |
973 (setq rcirc-time-format "%H:%M ") |
974 (setq rcirc-time-format "%H:%M ") |
974 (defun rcirc-handler-301 (process cmd sender args) |
975 (defun rcirc-handler-301 (process cmd sender args) |
975 "/away message handler.") |
976 "/away message handler.") |
|
977 |
|
978 (setq rcirc-default-server "irc.freenode.net") |
|
979 (setq rcirc-default-port 6667) |
|
980 (setq rcirc-default-nick user-nick) |
|
981 (setq rcirc-default-user-full-name user-full-name) |
976 |
982 |
977 ;;; ---------------------------------------------------------------- |
983 ;;; ---------------------------------------------------------------- |
978 ;;; erc. |
984 ;;; erc. |
979 |
985 |
980 ;; Take off noise message. |
986 ;; Take off noise message. |