;; -*- 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")))))