Conditional scroll bar
This commit is contained in:
parent
57af467e31
commit
8cd2eccc9a
@ -27,20 +27,19 @@
|
|||||||
(set-default-font "Source Code Pro-12")
|
(set-default-font "Source Code Pro-12")
|
||||||
(line-number-mode t)
|
(line-number-mode t)
|
||||||
(global-linum-mode t)
|
(global-linum-mode t)
|
||||||
(when 'display-graphic-p
|
|
||||||
(global-hl-line-mode))
|
|
||||||
|
|
||||||
(menu-bar-mode -1)
|
(menu-bar-mode -1)
|
||||||
(tool-bar-mode -1)
|
(tool-bar-mode -1)
|
||||||
(scroll-bar-mode -1)
|
|
||||||
(setq inhibit-startup-screen t)
|
(setq inhibit-startup-screen t)
|
||||||
(setq-default truncate-lines t)
|
(setq-default truncate-lines t)
|
||||||
(setq-default truncate-partial-width-windows nil)
|
(setq-default truncate-partial-width-windows nil)
|
||||||
|
|
||||||
(setq-default scroll-conservatively 100)
|
(setq-default scroll-conservatively 100)
|
||||||
|
|
||||||
|
|
||||||
(when 'display-graphic-p (lambda ()
|
(when 'display-graphic-p (lambda ()
|
||||||
(global-hl-line-mode t)))
|
(global-hl-line-mode t)
|
||||||
|
(scroll-bar-mode -1)))
|
||||||
|
|
||||||
(global-whitespace-mode)
|
(global-whitespace-mode)
|
||||||
(setq whitespace-style '(face trailing tabs spaces lines empty indentation
|
(setq whitespace-style '(face trailing tabs spaces lines empty indentation
|
||||||
|
Loading…
Reference in New Issue
Block a user