Update init

This commit is contained in:
Marcus Kammer 2019-06-12 14:55:15 +02:00
parent 8bec6b3277
commit 1bd858740e

21
init.el
View file

@ -17,14 +17,17 @@
;; installed packages. Don't delete this line. If you don't want it, ;; installed packages. Don't delete this line. If you don't want it,
;; just comment it out by adding a semicolon to the start of the line. ;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments. ;; You may delete these explanatory comments.
(package-initialize) (require 'package)
(add-to-list 'package-archives (add-to-list 'package-archives
'("melpa-stable" . "https://stable.melpa.org/packages/")) '("melpa-stable" . "https://stable.melpa.org/packages/"))
(package-initialize)
(custom-set-variables (custom-set-variables
;; custom-set-variables was added by Custom. ;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful. ;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance. ;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(auto-save-default nil)
'(backup-directory-alist (quote (("" . "~/.emacs.d/_backup_files"))))
'(cal-html-directory "~/Documents/Diary") '(cal-html-directory "~/Documents/Diary")
'(calendar-date-style (quote iso)) '(calendar-date-style (quote iso))
'(calendar-week-start-day 1) '(calendar-week-start-day 1)
@ -45,10 +48,11 @@
'(global-font-lock-mode t) '(global-font-lock-mode t)
'(global-hl-line-mode t) '(global-hl-line-mode t)
'(indent-tabs-mode nil) '(indent-tabs-mode nil)
'(inhibit-startup-screen nil) '(inhibit-startup-screen t)
'(line-spacing 3) '(line-spacing 3)
'(linum-relative-backend (quote display-line-numbers-mode)) '(linum-relative-backend (quote display-line-numbers-mode))
'(major-mode (quote text-mode)) '(major-mode (quote text-mode))
'(make-backup-files nil)
'(newsticker-download-logos nil) '(newsticker-download-logos nil)
'(newsticker-frontend (quote newsticker-plainview)) '(newsticker-frontend (quote newsticker-plainview))
'(newsticker-show-descriptions-of-new-items nil) '(newsticker-show-descriptions-of-new-items nil)
@ -58,9 +62,11 @@
("Linuxjournal" "https://www.linuxjournal.com/node/feed") ("Linuxjournal" "https://www.linuxjournal.com/node/feed")
("Phoronix" "https://www.phoronix.com/rss.php") ("Phoronix" "https://www.phoronix.com/rss.php")
("Python PEP" "https://www.python.org/dev/peps/peps.rss/") ("Python PEP" "https://www.python.org/dev/peps/peps.rss/")
("Ubuntu Stack Exchan" "https://askubuntu.com/feeds")
("USN" "https://usn.ubuntu.com/atom.xml")))) ("USN" "https://usn.ubuntu.com/atom.xml"))))
'(org-agenda-files (quote ("~/Documents/Journal"))) '(org-agenda-files (quote ("~/Documents/Journal")))
'(org-default-notes-file "~/Documents/Journal/notes.org") '(org-default-notes-file "~/Documents/Journal/notes.org")
'(package-enable-at-startup t)
'(package-selected-packages (quote (magit))) '(package-selected-packages (quote (magit)))
'(require-final-newline t) '(require-final-newline t)
'(timeclock-file "~/Documents/Diary/timelog") '(timeclock-file "~/Documents/Diary/timelog")
@ -119,11 +125,12 @@
(add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo")) (add-to-list 'load-path (expand-file-name "~/.emacs.d/__evo"))
(require 'evo-feeds) (require 'evo-feeds)
(when (display-graphic-p) (when (display-graphic-p)
(add-to-list 'default-frame-alist '(font . "Consolas-11")) (add-to-list 'default-frame-alist '(font . "Dejavu Sans Mono-10"))
(add-to-list 'default-frame-alist '(height . 55)) (add-to-list 'default-frame-alist '(height . 60))
(add-to-list 'default-frame-alist '(width . 80)))) (add-to-list 'default-frame-alist '(width . 80))
(add-to-list 'default-frame-alist '(alpha . (96)))))
(defun copy-whole-buffer () (defun copy-whole-buffer()
"Copy entire buffer to clipboard" "Copy entire buffer to clipboard"
(interactive) (interactive)
(clipboard-kill-ring-save (point-min) (point-max))) (clipboard-kill-ring-save (point-min) (point-max)))
@ -149,4 +156,4 @@
(next-line 1) (next-line 1)
(yank) (yank)
) )
(global-set-key (kbd "C-d") 'duplicate-line) ;;(global-set-key (kbd "C-d") 'duplicate-line)