2013-11-18 21:13:29 +00:00
|
|
|
;; important for golden-ratio to better work
|
|
|
|
(setq window-combination-resize t)
|
2012-12-21 21:06:22 +00:00
|
|
|
;; edit area full screen
|
2012-12-20 03:55:46 +00:00
|
|
|
(tool-bar-mode -1)
|
2014-07-11 04:14:00 +00:00
|
|
|
(when (not (eq window-system 'mac))
|
|
|
|
(menu-bar-mode -1))
|
2012-12-20 03:55:46 +00:00
|
|
|
(scroll-bar-mode -1)
|
2013-07-23 03:47:04 +00:00
|
|
|
;; fringes
|
|
|
|
(set-fringe-mode nil) ; default
|
|
|
|
(setq-default fringe-indicator-alist
|
|
|
|
'((truncation . nil) (continuation . nil)))
|
2012-12-21 21:06:22 +00:00
|
|
|
;; Show column number in mode line
|
|
|
|
(setq column-number-mode t)
|
2013-01-04 21:46:51 +00:00
|
|
|
;; line number
|
2013-01-16 13:10:35 +00:00
|
|
|
(setq linum-format "%4d")
|
2013-01-28 17:30:01 +00:00
|
|
|
;; highlight current line
|
2013-11-30 02:19:11 +00:00
|
|
|
(global-hl-line-mode t)
|
2012-12-20 03:55:46 +00:00
|
|
|
;; no blink
|
2013-11-27 16:10:02 +00:00
|
|
|
;; (blink-cursor-mode (- (*) (*) (*)))
|
2012-12-20 03:55:46 +00:00
|
|
|
;; tool tips in echo area
|
|
|
|
(tooltip-mode -1)
|
|
|
|
(setq tooltip-use-echo-area t)
|
|
|
|
;; When emacs asks for "yes" or "no", let "y" or "n" sufficide
|
|
|
|
(fset 'yes-or-no-p 'y-or-n-p)
|
2013-01-07 21:59:07 +00:00
|
|
|
;; font
|
2013-11-26 14:43:51 +00:00
|
|
|
;; (set-default-font "DejaVu Sans Mono-10")
|
2014-08-05 23:46:20 +00:00
|
|
|
(pcase window-system
|
|
|
|
(`x (progn
|
|
|
|
(add-to-list 'default-frame-alist '(font . "Source Code Pro-10"))
|
|
|
|
(set-default-font "Source Code Pro-10")))
|
|
|
|
(`mac
|
2014-07-08 04:08:59 +00:00
|
|
|
(progn
|
|
|
|
(add-to-list 'default-frame-alist '(font . "Source Code Pro-12"))
|
|
|
|
(set-default-font "Source Code Pro-12")))
|
2014-08-05 23:46:20 +00:00
|
|
|
(`w32
|
|
|
|
(progn
|
|
|
|
(add-to-list 'default-frame-alist '(font . "Source Code Pro-9"))
|
|
|
|
(set-default-font "Source Code Pro-9")))
|
2014-07-08 04:08:59 +00:00
|
|
|
(other (progn
|
2014-01-07 05:46:59 +00:00
|
|
|
(add-to-list 'default-frame-alist '(font . "Source Code Pro-10"))
|
|
|
|
(set-default-font "Source Code Pro-10")))
|
2014-07-08 04:08:59 +00:00
|
|
|
)
|
2013-01-09 19:15:22 +00:00
|
|
|
;; setup right and left margins
|
2013-02-20 19:07:02 +00:00
|
|
|
;; (add-hook 'window-configuration-change-hook
|
|
|
|
;; (lambda ()
|
|
|
|
;; (set-window-margins (car (get-buffer-window-list (current-buffer) nil t)) 0 0)))
|