.emacs-my
changeset 1253 504c216e8d21
parent 1240 b086f9c8a4db
child 1254 19c7b3be9b3a
equal deleted inserted replaced
1252:62509eda174b 1253:504c216e8d21
    10 ;; For load order see README.
    10 ;; For load order see README.
    11 
    11 
    12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    13 (message "recentf")
    13 (message "recentf")
    14 
    14 
    15 (setq recentf-save-file "~/.recentf")
    15 (setq recentf-save-file (concat user-emacs-directory ".recentf"))
    16 (when (eq system-type 'cygwin)
    16 (when (eq system-type 'cygwin)
    17   (setq recentf-save-file "~/.recentf-cygwin"))
    17   (setq recentf-save-file (concat user-emacs-directory ".recentf-cygwin")))
    18 
    18 
    19 (setq recentf-auto-cleanup 600)
    19 (setq recentf-auto-cleanup 600)
    20 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords!
    20 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords!
    21 (setq recentf-keep '(file-remote-p file-readable-p))
    21 (setq recentf-keep '(file-remote-p file-readable-p))
    22 (setq recentf-exclude                   ; Use ``M-x recentf-cleanup`` to update recentf-list.
    22 (setq recentf-exclude                   ; Use ``M-x recentf-cleanup`` to update recentf-list.
    77 (my-debug nil)
    77 (my-debug nil)
    78 
    78 
    79 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    79 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    80 (message "user info")
    80 (message "user info")
    81 
    81 
    82 ;; Set in ~/.emacs-auth:
    82 ;; Set in ~/.emacs.d/.emacs-auth:
    83 ;; (setq user-full-name "Oleksandr Gavenko")
    83 ;; (setq user-full-name "Oleksandr Gavenko")
    84 ;; (setq user-mail-address "gavenkoa@gmail.com")
    84 ;; (setq user-mail-address "gavenkoa@gmail.com")
    85 ;; (setq user-nick "gavenkoa")
    85 ;; (setq user-nick "gavenkoa")
    86 ;; (setq user-home-page "http://gavenkoa.users.sf.net")
    86 ;; (setq user-home-page "http://gavenkoa.users.sf.net")
    87 
    87 
  2107  erc-server-auto-reconnect t
  2107  erc-server-auto-reconnect t
  2108  erc-server-reconnect-timeout 60
  2108  erc-server-reconnect-timeout 60
  2109  erc-server-reconnect-attempts 2)
  2109  erc-server-reconnect-attempts 2)
  2110 
  2110 
  2111 (setq
  2111 (setq
  2112  erc-log-channels-directory "~/.irc"
  2112  erc-log-channels-directory "~/.emacs.d/.irc"
  2113  erc-log-file-coding-system 'utf-8-unix)
  2113  erc-log-file-coding-system 'utf-8-unix)
  2114 (eval-after-load 'erc
  2114 (eval-after-load 'erc
  2115   (lambda ()
  2115   (lambda ()
  2116     (require 'erc-log)
  2116     (require 'erc-log)
  2117     (mkdir erc-log-channels-directory t)))
  2117     (mkdir erc-log-channels-directory t)))
  3050 
  3050 
  3051 (setq
  3051 (setq
  3052  make-backup-files t
  3052  make-backup-files t
  3053  ;; In other case (by renaming) you loose original file creation date.
  3053  ;; In other case (by renaming) you loose original file creation date.
  3054  backup-by-copying t
  3054  backup-by-copying t
  3055  backup-directory-alist '(("." . "~/.backup")) ; don't litter my fs tree
  3055  backup-directory-alist '(("." . "~/.emacs.d/.backup")) ; don't litter my fs tree
  3056  delete-old-versions t                         ; delete excess backup versions silently
  3056  delete-old-versions t                         ; delete excess backup versions silently
  3057  kept-old-versions 1                           ; store first original version
  3057  kept-old-versions 1                           ; store first original version
  3058  kept-new-versions 3                           ; store last 3 version
  3058  kept-new-versions 3                           ; store last 3 version
  3059  version-control t)                            ; use versioned backups
  3059  version-control t)                            ; use versioned backups
  3060 
  3060