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

;; ======================================================================
;; Load path.
(defvar my-el-dir
  (expand-file-name "~/.el")
  "Here live additional lisp packages.")
(defvar my-usr-el-dir
  (expand-file-name "~/usr/share/emacs/site-lisp")
  "Here live additional lisp packages.")

(add-to-list 'load-path my-el-dir)
(add-to-list 'load-path my-usr-el-dir)

(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")))))