remove distractions right from the start

This commit is contained in:
2023-04-12 16:41:11 +02:00
parent f9aa8e01a1
commit 92c3e6b6f1
2 changed files with 17 additions and 25 deletions

View File

@@ -50,22 +50,6 @@
(define-key key-translation-map [?\C-h] [?\C-?]) (define-key key-translation-map [?\C-h] [?\C-?])
;;; ** hide menu- and tool-bar
;; I prefer a bare bones emacs window without any distractions, so turn them off.
(menu-bar-mode -1)
(tool-bar-mode -1)
(setq use-dialog-box nil)
(scroll-bar-mode 0)
;;; ** stay silent on startup
(setq initial-scratch-message "")
(setq inhibit-startup-message t)
(setq inhibit-startup-screen t)
(setq inhibit-startup-echo-area-message "scip")
;;; ** y means yes ;;; ** y means yes
;; y is shorter than yes and less error prone. ;; y is shorter than yes and less error prone.
(defalias 'yes-or-no-p 'y-or-n-p) (defalias 'yes-or-no-p 'y-or-n-p)
@@ -170,13 +154,10 @@
;; delete whole lines ;; delete whole lines
(setq kill-whole-line t) (setq kill-whole-line t)
;; middle-mouse and C-y use both X-selection and Emacs-clipboard ;; middle-mouse, shift-INSERT use both X-selection and Emacs-clipboard
;; (if (null tvd-win-home) (setq x-select-enable-primary t)
;; (progn ; unix (setq x-select-enable-clipboard nil)
;; (setq x-select-enable-primary t) (setq select-enable-primary t) ;; c-y use primary
;; (setq x-select-enable-clipboard nil))
;; (progn ; win
;; (global-set-key (kbd "<up-mouse-2>") 'yank)))
;; marked region automatically copied, also on win ;; marked region automatically copied, also on win
(setq mouse-drag-copy-region t) (setq mouse-drag-copy-region t)

15
init.el
View File

@@ -5,7 +5,19 @@
;; I'm using an outdated config somewhere. ;; I'm using an outdated config somewhere.
(defvar tvd-emacs-version "20230412.01") (defvar tvd-emacs-version "20230412.01")
;; from purcell's config ;; I prefer a bare bones emacs window without any distractions, so turn them off.
(menu-bar-mode -1)
(tool-bar-mode -1)
(setq use-dialog-box nil)
(scroll-bar-mode 0)
;;; ** stay silent on startup
(setq initial-scratch-message "")
(setq inhibit-startup-message t)
(setq inhibit-startup-screen t)
(setq inhibit-startup-echo-area-message "scip")
;; from purcell's config, used below
(defun sanityinc/add-subdirs-to-load-path (parent-dir) (defun sanityinc/add-subdirs-to-load-path (parent-dir)
"Add every non-hidden subdir of PARENT-DIR to `load-path'." "Add every non-hidden subdir of PARENT-DIR to `load-path'."
(let ((default-directory parent-dir)) (let ((default-directory parent-dir))
@@ -70,7 +82,6 @@
;; ** mode-line setup (must be the last mode) ;; ** mode-line setup (must be the last mode)
;; I just append the current version of my emacs config and leave out ;; I just append the current version of my emacs config and leave out