Re: gnus

[Ruslan Kosolapov <rkosolapov@swsoft.com>]

 ОХ> Пытаюсь освоить таки gnus а за одно и emacs.

 ОХ> У кого вдруг откоментироавнные конфиги одного с другим -
 ОХ> поделитесь.  Гугль допрошен, в связи с чем Отту и Бутенко спасибо
 ОХ> :)
 
  .gnus приводить смысла нет, там фильтры да gnus-posting-styles, а
  это у каждого своё.

  .emacs ниже (раскраску вырезал).

  Если это поможет хоть чем-то, то я сильно удивлюсь и порекомендую
  сходить на emacswiki.org.


;; add loadpath
(setq load-path (cons "/home/rk/.emacs.d" load-path))
(setq load-path (cons "/home/rk/.elisp" load-path))

;; turn toolbar off
(tool-bar-mode nil)

;; fansy scrolling
(setq scroll-conservatively 10)
(setq scroll-up-aggressively 0)
(setq scroll-down-aggressively 0)
(setq scroll-margin 3) 

;; fansy gui
(setq default-indicate-empty-lines t
      default-indicate-unused-lines t
      default-indicate-buffer-boundaries t)

;; drive out the mouse when it's too near to the cursor.
(mouse-avoidance-mode 'animate)

;; i like to use recent files feature
(recentf-mode 1)
(setq recentf-max-saved-items 20)

;; workspaces is usefull sometimes, see documentation about features
(require 'workspaces)
(global-set-key (kbd "C-`") 'workspace-controller)

;; I like to see fresh files :)
(global-auto-revert-mode 1)

;; some keybindings
(global-set-key (kbd "C-x C-b") 'bs-show)
(global-set-key [(control tab)] 'other-window)
(global-set-key (kbd "C-z") 'advertised-undo)
(global-set-key (kbd "M-g") 'goto-line) 

;; iswitchbuf
(iswitchb-mode 1)

;; set format of window titles
(setq frame-title-format "Emacs: %b %+%+ %f")
(setq icon-title-format "Emacs - %b")

;; editing eye-candy
(transient-mark-mode 1)

;; quack-mode
(require 'quack)

;; browser
(setq browse-url-browser-function 'browse-url-opera-new-tab)
(defun browse-url-opera-new-tab (url &optional new-window)
  ;; new-window ignored
  "Open URL in a new tab in Opera."
  (interactive (browse-url-interactive-arg "URL: "))
  (shell-command-to-string 
   (concat "opera -newpage '" url "'")))

;; lisp
(setq inferior-lisp-program "/usr/bin/clisp")

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(paren-mode (quote paren) nil (paren))
 '(quack-default-program "guile")
 '(quack-fontify-style (quote emacs))
 '(show-paren-delay 0)
 '(show-paren-mode (quote paren) nil (paren)))

(custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
)


-- 
Ruslan Kosolapov
Plesk QA Department Second Manager
SWsoft, Inc.