;; Добавляем пути для поиска нужных библиотек и расширений
(add-to-list 'load-path "~/.emacs.d/lisp/lua-mode/")
(add-to-list 'load-path "~/.emacs.d/lisp/php-mode/")

;;;
;;; Appearance
;;;
;; Disable GUI components
(tooltip-mode      -1)
(menu-bar-mode     -1) ; disable menu-bar
(tool-bar-mode     -1) ; disable tool-bar
(scroll-bar-mode   -1) ; disable scroll-bar
(blink-cursor-mode -1) ; disable cursor blink
(setq use-dialog-box     nil) ; disable gui dialogs
(setq redisplay-dont-pause t) ; better buffer draw
(setq ring-bell-function 'ignore) ; disable bell
(setq inhibit-splash-screen   t) ; disable splash screen
(setq ingibit-startup-message t) ; disable startup message
(setq frame-title-format "GNU Emacs: %b") ; display the name of the current buffer in the title bar
(show-paren-mode t) ;; paren highlignt
(global-visual-line-mode t)
(setq column-number-mode t) ;; display column numver at modeline

;; Display current time in modeline
(setq display-time-string-forms
      '((propertize (concat "[" 24-hours ":" minutes "]"))))
      (display-time-mode 1)

;; Set font
(set-default-font "Terminus-12")

;; Load and set solarized color theme
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes/solarized/")
(load-theme 'solarized-dark t)

;;;
;;; Lua & php modes
;;;
(require 'lua-mode)
(require 'php-mode)

;;;
;;; Other
;;;
(delete-selection-mode t) ; delete selection by input new character

;; Disable backup/autosave files
(setq make-backup-files        nil)
(setq auto-save-default        nil)
(setq auto-save-list-file-name nil)

;; Scroll settings
(setq scroll-conservatively 50)
(setq scroll-margin 0)

;; Clipboard settings
(setq x-select-enable-clipboard t)

;;;
;;; SLIME
;;;
(add-to-list 'load-path "~/.emacs.d/lisp/slime/")
(require 'slime)
(setq inferior-lisp-program "/usr/bin/sbcl")
(setq slime-contribs '(slime-fancy))

;;;
;;; Instead mode
;;;
(load "~/.emacs.d/lisp/emacs-instead/emacs-instead.el")
(global-set-key (kbd "<f4>") 'instead-goto-room)
(global-set-key (kbd "<f5>") 'instead-goto-obj)
(global-set-key (kbd "<f6>") 'instead-goto-dlg)
(global-set-key (kbd "<f7>") 'instead-start)