.emacs
author gavenkoa@gavenko.bifit.int
Tue, 28 Oct 2008 15:06:03 +0200
changeset 84 f65916e51b79
parent 71 8d0f605b4990
child 83 d2eaf2ed6d1c
child 92 359f03f8a64b
permissions -rw-r--r--
Don't beep in my headphones!

;; -*- mode: lisp; coding: cp1251 -*-
;;
;; Copyright (C) 2008 by Oleksandr Gavenko <gavenkoa@gmail.com>
;; Copyright (C) 2008 by Гавенко Алескандр

(defvar user-el-dir (expand-file-name "~/.el")
  "Dir where stored extensions.")

(defvar dot-emacs-my-custom-pre (expand-file-name "~/.emacs-my-custom-pre")
  "Path to file with pre-loaded custom settings.")
(defvar dot-emacs-my-custom-post (expand-file-name "~/.emacs-my-custom-post")
  "Path to file with post-loaded custom settings.")

;; pre-load custom settings
(if (file-exists-p dot-emacs-my-custom-pre)
    (load dot-emacs-my-custom-pre))

;; load main customization
(load "~/.emacs-my")

;; post-load custom settings
(if (file-exists-p dot-emacs-my-custom-post)
    (load dot-emacs-my-custom-post))

(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.
 '(Info-enable-edit t)
 '(browse-url-browser-function (quote browse-url-default-windows-browser))
 '(ecb-tip-of-the-day nil)
 '(eshell-command-interpreter-max-length 1024)
 '(pc-select-meta-moves-sexps t)
 '(read-quoted-char-radix 16)
 '(sentence-end-double-space nil)
 '(sql-password "")
 '(view-read-only t)
 '(w32-allow-system-shell t))
(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.
 '(hl-line ((t (:inherit highlight :background "light yellow")))))