Fix compilation scrolling
change compilation scroll-up-aggressively to float, change compilation-scroll-output to first-error
This commit is contained in:
parent
656f0d8b45
commit
2c70a79ac2
@ -8,8 +8,7 @@
|
|||||||
(add-hook 'sh-mode-hook (lambda () (setq tab-width 4)))
|
(add-hook 'sh-mode-hook (lambda () (setq tab-width 4)))
|
||||||
|
|
||||||
;;;; various options
|
;;;; various options
|
||||||
(setq compilation-scroll-output 1
|
(setq read-file-name-completion-ignore-case t
|
||||||
read-file-name-completion-ignore-case t
|
|
||||||
inhibit-startup-screen t
|
inhibit-startup-screen t
|
||||||
vc-follow-symlinks t
|
vc-follow-symlinks t
|
||||||
custom-file (expand-file-name "~/.emacs.d/custom.el")
|
custom-file (expand-file-name "~/.emacs.d/custom.el")
|
||||||
@ -67,7 +66,9 @@
|
|||||||
:bind (("C-z" . recompile)
|
:bind (("C-z" . recompile)
|
||||||
("C-S-z" . compile))
|
("C-S-z" . compile))
|
||||||
:config
|
:config
|
||||||
(add-hook 'compilation-start-hook (lambda (x) (setq-local scroll-up-aggressively 0))))
|
(setq compilation-scroll-output 'first-error)
|
||||||
|
(add-hook 'compilation-start-hook
|
||||||
|
(lambda (x) (setq-local scroll-up-aggressively 0.0)))
|
||||||
|
|
||||||
(use-package verilog-mode
|
(use-package verilog-mode
|
||||||
:defer
|
:defer
|
||||||
|
Loading…
Reference in New Issue
Block a user