emacs: remove from this repo for now

This commit is contained in:
2022-08-25 22:45:01 +01:00
parent fbe3192266
commit dd447c5dd7
12 changed files with 0 additions and 675 deletions

48
emacs
View File

@@ -1,48 +0,0 @@
;; Global keybindings
;; (global-set-key [f5] 'slime)
;; Global settings
;; Added by Package.el. This must come before configurations of
;; 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.
;; You may delete these explanatory comments.
(require 'package)
(let* ((no-ssl (and (memq system-type '(windows-nt ms-dos))
(not (gnutls-available-p))))
(proto (if no-ssl "http" "https")))
(when no-ssl
(warn "\
Your version of Emacs does not support SSL connections,
which is unsafe because it allows man-in-the-middle attacks.
There are two things you can do about this warning:
1. Install an Emacs version that does support SSL and be safe.
2. Remove this warning from your init file so you won't see it again."))
;; Comment/uncomment these two lines to enable/disable MELPA and MELPA Stable as desired
(add-to-list 'package-archives (cons "melpa" (concat proto "://melpa.org/packages/")) t)
;;(add-to-list 'package-archives (cons "melpa-stable" (concat proto "://stable.melpa.org/packages/")) t)
(when (< emacs-major-version 24)
;; For important compatibility libraries like cl-lib
(add-to-list 'package-archives (cons "gnu" (concat proto "://elpa.gnu.org/packages/")))))
(package-initialize)
(windmove-default-keybindings)
;; (setq windmove-wrap-around t)
(global-set-key "\C-m" 'newline-and-indent)
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(package-selected-packages
(quote
(alchemist markdown-preview-mode markdown-mode magit helm-gtags helm-ag fzf))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)

View File

@@ -1,20 +0,0 @@
;;;; Emacs Bookmark Format Version 1 ;;;; -*- coding: utf-8-emacs -*-
;;; This format is meant to be slightly human-readable;
;;; nevertheless, you probably don't want to edit it.
;;; -*- End Of Bookmark File Format Version Stamp -*-
(("org-capture-last-stored-marker"
(filename . "~/.notes")
(front-context-string . "** TODO \n [202")
(rear-context-string . "]\nDo some work!\n")
(position . 52))
("org-refile-last-stored"
(filename . "~/.notes")
(front-context-string . "** TODO \n [202")
(rear-context-string . "]\nDo some work!\n")
(position . 52))
("org-capture-last-stored"
(filename . "~/.notes")
(front-context-string . "** TODO \n [202")
(rear-context-string)
(position . 9))
)

View File

@@ -1,25 +0,0 @@
(defun color-theme-amber ()
(interactive)
(color-theme-install
'(color-theme-amber
((background-color . "#160903")
(background-mode . light)
(border-color . "#472400")
(cursor-color . "#a35000")
(foreground-color . "#eeeeec")
(mouse-color . "black"))
(fringe ((t (:background "#472400"))))
(mode-line ((t (:foreground "#ffb347" :background "#402008"))))
(region ((t (:background "#482b0f"))))
(font-lock-builtin-face ((t (:foreground "#d56b44"))))
(font-lock-comment-face ((t (:foreground "#888a85"))))
(font-lock-function-name-face ((t (:foreground "#f9971a"))))
(font-lock-keyword-face ((t (:foreground "#ffb633"))))
(font-lock-string-face ((t (:foreground "#b28153"))))
(font-lock-type-face ((t (:foreground"#ff6e1a"))))
(font-lock-constant-face ((t (:foreground "#e9771a"))))
(font-lock-variable-name-face ((t (:foreground "#e05542"))))
(minibuffer-prompt ((t (:foreground "#fa7d00" :bold t))))
(font-lock-warning-face ((t (:foreground "red" :bold t))))
)))
(provide 'color-theme-amber)

View File

@@ -1,26 +0,0 @@
(defun color-theme-aquamarina-762835 ()
"Theme generated by Sweyla: http://inspiration-theme.sweyla.com/code/seed/762835/"
(interactive)
(color-theme-install
'(color-theme-aquamarina-762835
((background-color . "#07050D")
(foreground-color . "#FFFFFF")
(background-mode . dark)
(border-color . "#323232")
(cursor-color . "#FFFFFF")
(mouse-color . "#323232"))
(mode-line ((t (:foreground "#FFFFFF" :background "#323232"))))
(region ((t (:background "#323232"))))
(font-lock-comment-face ((t (:foreground "#00A3FF"))))
(font-lock-constant-face ((t (:foreground "#2978FF"))))
(font-lock-builtin-face ((t (:foreground "#02F8FF"))))
(font-lock-function-name-face ((t (:foreground "#60F5FF"))))
(font-lock-variable-name-face ((t (:foreground "#00B7C2"))))
(font-lock-keyword-face ((t (:foreground "#55BDB5"))))
(font-lock-string-face ((t (:foreground "#FFFF7C"))))
(font-lock-doc-string-face ((t (:foreground "#FFFF7C"))))
(font-lock-type-face ((t (:foreground "#D5E8B1"))))
)))
(provide 'color-theme-aquamarina-762835)

View File

@@ -1,27 +0,0 @@
(defun color-theme-smoothy-786597 ()
"Theme generated by Sweyla: http://color-theme-smoothy-786597.el.sweyla.com/code/seed/786597/"
(interactive)
(color-theme-install
'(color-theme-smoothy-786597
((background-color . "#000000")
(foreground-color . "#FFFFFF")
(background-mode . dark)
(border-color . "#323232")
(cursor-color . "#FFFFFF")
(mouse-color . "#323232"))
(mode-line ((t (:foreground "#FFFFFF" :background "#323232"))))
(region ((t (:background "#323232"))))
(font-lock-comment-face ((t (:foreground "#208598"))))
(font-lock-constant-face ((t (:foreground "#A9430C"))))
(font-lock-builtin-face ((t (:foreground "#7F669E"))))
(font-lock-function-name-face ((t (:foreground "#C8FFBE"))))
(font-lock-variable-name-face ((t (:foreground "#4DB021"))))
(font-lock-keyword-face ((t (:foreground "#BFA155"))))
(font-lock-string-face ((t (:foreground "#5BC500"))))
(font-lock-doc-string-face ((t (:foreground "#5BC500"))))
(font-lock-type-face ((t (:foreground "#DE5E12"))))
)))
(provide 'color-theme-smoothy-786597)

View File

@@ -1,23 +0,0 @@
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(custom-enabled-themes (quote (dracula)))
'(custom-safe-themes
(quote
("c433c87bd4b64b8ba9890e8ed64597ea0f8eb0396f4c9a9e01bd20a04d15d358" "303488aa27ce49f658a7ba4035e93380421e394ec2799ae8fd952d08808c7235" "0fffa9669425ff140ff2ae8568c7719705ef33b7a927a0ba7c5e2ffcfac09b75" "dcdd1471fde79899ae47152d090e3551b889edf4b46f00df36d653adc2bf550d" default)))
'(fringe-mode 6 nil (fringe))
'(linum-format " %7i ")
'(org-agenda-files (quote ("~/data/org/notes.org" "~/data/org/work.org")))
'(package-selected-packages
(quote
(markdown-preview-eww markdown-mode+ helm-swoop fzf solarized-theme cmake-project cmake-ide rust-playground rust-mode company magit-gerrit elixir-mode evil-org org-pomodoro evil magit dracula-theme use-package)))
'(powerline-color1 "#00779a")
'(powerline-color2 "#00475a"))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)

View File

@@ -1,112 +0,0 @@
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
(add-to-list 'package-archives '("org" . "http://orgmode.org/elpa/") t)
(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
(package-initialize)
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(package-selected-packages
(quote
(evil-org monitor evil slime notmuch use-package magit dracula-theme))))
(unless (package-installed-p 'org)
(package-refresh-contents)
(package-install 'org))
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
(unless (package-installed-p 'evil)
(package-refresh-contents)
(package-install 'evil))
(eval-when-compile
(require 'use-package))
(require 'bind-key)
(setq user-full-name "Paul Walker")
(setq user-email "paul.walker@broadcom.com")
(setq custom-file (expand-file-name "custom.el" user-emacs-directory))
(when (file-exists-p custom-file)
(load custom-file))
(when window-system
(tool-bar-mode 0)
(tooltip-mode 0))
(windmove-default-keybindings 'ctrl)
; Can re-bind these.
; windmove-up
; windmove-down
; windmove-left
; windmove-right
(eval-when-compile (require 'cl))
(ido-mode 1)
(global-set-key (kbd "C-p") 'fzf-git)
(global-set-key (kbd "C-x b") 'ibuffer)
;; initial window
(setq initial-frame-alist
'((width . 102) ; characters in a line
(height . 44))) ; number of lines
;; sebsequent frame
(setq default-frame-alist
'((width . 100) ; characters in a line
(height . 42))) ; number of lines
;; No welcome screen - opens directly in scratch buffer
(setq inhibit-startup-message t
initial-scratch-message ""
initial-major-mode 'fundamental-mode
inhibit-splash-screen t)
(setq visible-bell nil)
(setq ring-bell-function 'ignore)
(fset 'yes-or-no-p 'y-or-n-p)
(setq save-abbrevs 'silently)
(setq-default abbrev-mode t)
(setq gdb-many-windows t
gdb-show-main t)
(setq tramp-default-method "ssh"
tramp-backup-directory-alist backup-directory-alist
tramp-ssh-controlmaster-options "ssh")
(setq sentence-end-double-space nil)
(savehist-mode)
;; Recentf mode changes
(setq recentf-max-saved-items 1000
recentf-exclude '("/tmp/" "/ssh:"))
(recentf-mode)
; (global-set-key [C-Z] 'undo)
(autoload 'notmuch "notmuch" "notmuch mail" t)
(use-package evil-org
:ensure t
:after org
:config
(add-hook 'org-mode-hook 'evil-org-mode)
(add-hook 'evil-org-mode-hook
(lambda ()
(evil-org-set-key-theme)))
(require 'evil-org-agenda)
(evil-org-agenda-set-keys))
(add-hook 'after-init-hook 'global-company-mode)

View File

@@ -1,238 +0,0 @@
(deftheme mechanical-turq
"mechanical-turq By: Jasonm23 / Created 2012-06-26.")
(custom-theme-set-variables
'mechanical-turq
'(powerline-color1 "#00779a")
'(powerline-color2 "#00475a")
'(linum-format " %7i ")
'(fringe-mode 6 nil (fringe))
)
(custom-theme-set-faces
'mechanical-turq
'(default
((t
(:foreground "#ffffff"
:background "#00080A"))))
'(fixed-pitch
((t (:family "Monospace"))))
'(variable-pitch
((t (:family "Sans Serif"))))
'(escape-glyph ;; Things like
and other control chars.
((t (:foreground "#FF6600" :background "#011d2c"))))
;; Line Numbers (linum-mode)
'(linum
((t (:background "#00181b" :foreground "#005050" :box nil :height 100))))
;; Margin Fringes
'(fringe
((t ( :background "#00181b" :Foreground "#006060" ))))
;; Mode-line / status line
'(mode-line
((t (:background "#0b2c2d" :box nil :foreground "#0cd6e4" :height 85))))
'(mode-line-inactive
((t (:weight light :box nil :background "#002329" :foreground "#000000" :inherit (mode-line)))))
'(mode-line-emphasis
((t (:weight bold))))
'(mode-line-highlight
((t (:box nil (t (:inherit (highlight)))))))
'(mode-line-buffer-id
((t (:weight bold :box nil))))
;; Cursor
'(cursor
((t (:foreground "#ffffff" :background "#013d4c"))))
;; Minibuffer
'(minibuffer-prompt
((t (:weight bold :foreground "#00aab2"))))
'(minibuffer-message
((t (:foreground "#ffffff"))))
;; Region
'(region
((t (:background "#001f26"))))
;; Secondary region
'(secondary-selection
((((class color) (min-colors 88) (background dark)) (:background "#144053"))))
;; font-lock - syntax highlighting
'(font-lock-builtin-face ((t (:foreground "#508590"))))
'(font-lock-comment-face ((t (:foreground "#265f59"))))
'(font-lock-comment-delimiter-face ((t (:foreground "#467882" ))))
'(font-lock-doc-face ((t (:inherit (font-lock-string-face)))))
'(font-lock-function-name-face ((t (:foreground "#60c3be"))))
'(font-lock-keyword-face ((t (:foreground "#0abda7"))))
'(font-lock-negation-char-face ((t nil)))
'(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face)))))
'(font-lock-regexp-grouping-backslash ((t (:inherit (bold)))))
'(font-lock-regexp-grouping-construct ((t (:inherit (bold)))))
'(font-lock-string-face ((t (:foreground "#aaedee"))))
'(font-lock-constant-face ((t (:foreground "#1ae9d7"))))
'(font-lock-type-face ((t (:foreground "#1f8e8a"))))
'(font-lock-variable-name-face ((t (:foreground "#0ebeb8"))))
'(font-lock-warning-face ((t (:weight bold :foreground "#FF0000"))))
;; Hightlight
'(highlight
((((class color) (min-colors 88) (background light))
(:background "#004453"))
(((class color)
(min-colors 88)
(background dark))
(:background "#004450"))
(((class color) (min-colors 16)
(background light))
(:background "#004450"))
(((class color)
(min-colors 16)
(background dark))
(:background "#005560"))
(((class color)
(min-colors 8))
(:foreground "#000000" :background "#00FF00"))
(t (:inverse-video t))))
'(shadow
((((class color grayscale)
(min-colors 88)
(background light))
(:foreground "#999999"))
(((class color grayscale)
(min-colors 88)
(background dark))
(:foreground "#999999"))
(((class color)
(min-colors 8)
(background light))
(:foreground "#00ff00"))
(((class color)
(min-colors 8)
(background dark))
(:foreground "#ffff00"))))
'(trailing-whitespace
((((class color)
(background light))
(:background "#ff0000"))
(((class color)
(background dark))
(:background "#ff0000")) (t (:inverse-video t))))
'(link ((((class color) (min-colors 88)
(background light)) (:underline t :foreground "#00b7f0")) (((class color)
(background light)) (:underline t :foreground "#0044FF")) (((class color) (min-colors 88)
(background dark)) (:underline t :foreground "#0099aa")) (((class color)
(background dark)) (:underline t :foreground "#0099aa")) (t (:inherit (underline)))))
'(link-visited ((default (:inherit (link))) (((class color)
(background light)) (:inherit (link))) (((class color)
(background dark)) (:inherit (link)))))
'(button ((t (:inherit (link)))))
'(header-line ((default (:inherit (mode-line))) (((type tty)) (:underline t :inverse-video nil))
(((class color grayscale)
(background light)) (:box nil :foreground "#222222" :background "#bbbbbb"))
(((class color grayscale)
(background dark)) (:box nil :foreground "#bbbbbb" :background "#222222"))
(((class mono)
(background light)) (:underline t :box nil :inverse-video nil :foreground "#000000" :background "#ffffff"))
(((class mono)
(background dark)) (:underline t :box nil :inverse-video nil :foreground "#ffffff" :background "#000000"))))
'(tooltip ((default nil) (nil nil)))
'(isearch
((((class color) (min-colors 88)
(background light)) (:foreground "#99ccee" :background "#444444"))
(((class color) (min-colors 88)
(background dark)) (:foreground "#bb3311" :background "##444444"))
(((class color) (min-colors 16)) (:foreground "#0088cc" :background "#444444"))
(((class color) (min-colors 8)) (:foreground "#0088cc" :background "#444444")) (t (:inverse-video t))))
'(isearch-fail
((((class color)
(min-colors 88)
(background light))
(:background "#ffaaaa"))
(((class color)
(min-colors 88)
(background dark))
(:background "#880000"))
(((class color)
(min-colors 16))
(:background "#FF0000"))
(((class color)
(min-colors 8))
(:background "#FF0000"))
(((class color grayscale))
(:foreground "#888888")) (t (:inverse-video t))))
'(lazy-highlight
((((class color)
(min-colors 88)
(background light))
(:background "#77bbdd"))
(((class color)
(min-colors 88)
(background dark))
(:background "#77bbdd"))
(((class color)
(min-colors 16))
(:background "#4499ee"))
(((class color)
(min-colors 8))
(:background "#4499ee")) (t (:underline t))))
'(match
((((class color)
(min-colors 88)
(background light))
(:background "#3388cc"))
(((class color)
(min-colors 88)
(background dark))
(:background "#3388cc"))
(((class color)
(min-colors 8)
(background light))
(:foreground "#000000" :background "#FFFF00"))
(((class color)
(min-colors 8)
(background dark))
(:foreground "#ffffff" :background "#0000FF")) (((type tty) (class mono)) (:inverse-video t)) (t (:background "#888888"))))
'(next-error
((t (:inherit (region)))))
'(query-replace
((t (:inherit (isearch)))))
)
(provide-theme 'mechanical-turq)

View File

@@ -1,3 +0,0 @@
(
(:id "sha1:d845e6530fd2e60812dece59ee93a7ae9d373ef1" :fingerprint "sha1:34:54:18:5f:bb:5b:63:d6:03:0c:70:c6:18:cb:fc:70:6d:1d:80:a9" :host "news.xcski.com:nntp" :conditions (:self-signed :no-host-match :expired :unknown-ca :invalid))
)

View File

@@ -1,134 +0,0 @@
(setq org-directory "~/data/org")
(setq org-agenda-files "~/data/org")
(setq org-catch-invisible-edits t)
;; (setq org-hide-emphasis-markers t)
;; (setq org-src-fontify-natively t
;; org-src-tab-acts-natively t)
(setq org-startup-indented t)
;;(setq org-hide-leading-stars t)
;; (setq org-export-with-smart-quotes t
;; org-export-backends '(beamer html md))
(setq org-tag-alist (quote (("irdeto" . ?i)
("nagra" . ?n)
("security" . ?s)
("admin" . ?a))))
;; (setq org-tag-alist (quote (("article" . ?a) ;; temporary
;; ("books" . ?b)
;; ("work" . ?w)
;; ("noexport" . ?x)
;; ("cash" . ?$))))
(setq org-todo-keywords
'((sequence "TODO(t)" "IN-PROGRESS(i)" "|" "DONE(d!)")
(sequence "WAITING(w@/!)" "|" "CANCELED(c@)")
(sequence "IN-REVIEW(r)"))
(setq org-todo-keyword-faces
(quote (("TODO" :foreground "red" :weight bold)
("NEXT" :foreground "blue" :weight bold)
("DONE" :foreground "forest green" :weight bold)
("WAITING" :foreground "orange" :weight bold)
("HOLD" :foreground "magenta" :weight bold)
("CANCELLED" :foreground "forest green" :weight bold)
("MEETING" :foreground "forest green" :weight bold)
("PHONE" :foreground "forest green" :weight bold))))
;; (setq org-use-fast-todo-selection t)
;; (setq org-treat-S-cursor-todo-selection-as-state-change nil)
(add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\)$" . org-mode))
;; (setq org-agenda-files (list
;; "~/data/org/notes.org"
;; "~/data/org/work.org"))
;; (setq org-default-notes-file "~/data/org/refile.org")
;; (setq org-deadline-warning-days 7
;; org-agenda-span 'fortnight
;; org-agenda-skip-scheduled-if-deadline-is-shown t)
;; (setq org-deadline-warning-days 7
;; org-agenda-span 'fortnight)
(setq org-capture-templates
'(
("n"
"Note"
entry
(file+headline "~/data/org/notes.org" "Notes")
"* %? %(org-set-tags) :note:\n:PROPERTIES:\n:Created: %U\n:Linked: %A\n:END:\n%i" ; template
:prepend t ; properties
:empty-lines 1 ; properties
:created t ; properties
:kill-buffer t ; properties
;; For notes or something regarding more work
)
;; (
;; "w" ; key
;; "Work" ; name
;; entry ; type
;; (file+headline "~/data/org/work.org" "Work") ; target
;; "* TODO %^{Todo} %(org-set-tags) :work:\n:PROPERTIES:\n:Created: %U\n:END:\n%i\n%?" ; template
;; :prepend t ; properties
;; :empty-lines 1 ; properties
;; :created t ; properties
;; :kill-buffer t ; properties
;; )
;; )
))
;; (setq org-refile-targets '((nil :maxlevel . 9)
;; (org-agenda-files :maxlevel . 9)))
;; (setq org-refile-use-outline-path t
;; org-outline-path-complete-in-steps nil)
;; (use-package org
;; :ensure org
;; :bind* (("M-m o a" . org-agenda)
;; ("M-m o c" . org-capture)
;; ("M-m o i" . org-insert-link)
;; ("M-m o s" . org-store-link)
;; ("M-m o S" . org-list-make-subtree)
;; ("M-m o A" . org-archive-subtree)
;; ("M-m o g" . org-goto)
;; ("M-m o l" . org-toggle-latex-fragment)
;; ("M-m o L" . org-toggle-link-display)
;; ("M-m o I" . org-toggle-inline-images)
;; ("M-m o k" . org-cut-subtree)
;; ("M-m o V" . org-reveal)
;; ("M-m o R" . org-refile)
;; ("M-m o y" . org-copy-subtree)
;; ("M-m o h" . org-toggle-heading)
;; ("M-m o H" . org-insert-heading-respect-content)
;; ("M-m o e" . org-export-dispatch)
;; ("M-m o u" . org-update-dblock)
;; ("M-m o U" . org-update-all-dblocks)
;; ("M-m o O" . org-footnote)
;; ("M-m o ]" . org-narrow-to-subtree)
;; ("M-m o [" . widen)
;; ("M-m o N" . org-add-note)
;; ("M-m o E" . org-set-effort)
;; ("M-m o B" . org-table-blank-field)
;; ("M-m o <" . org-date-from-calendar)
;; ("M-m o >" . org-goto-calendar)
;; ("M-m o d" . org-todo)
;; ("M-m o t" . org-set-tags-command)
;; ("M-m o w" . org-edit-special)
;; ("M-m o q" . org-edit-src-exit)
;; ("M-m o z" . clone-indirect-buffer-other-window)
;; ("M-m a s" . org-mark-subtree)
;; ("M-m o RET" . org-open-at-point))
;; :config
;; ;; More of those nice template expansion
;; (add-to-list 'org-structure-template-alist '("A" "#+DATE: ?")))
;; ;; (which-key-add-key-based-replacements
;; ;; "M-m o" "org mode prefix")
;; (global-set-key (kbd "<f12>") 'org-agenda)
;; (global-set-key (kbd "C-c c") 'org-capture)

View File

@@ -1,19 +0,0 @@
(load-theme 'dracula t)
;; Don't change the font size for some headings and titles (default t)
;; (setq dracula-enlarge-headings nil)
;; ;; Adjust font size of titles level 1 (default 1.3)
;; (setq dracula-height-title-1 1.25)
;; ;; Adjust font size of titles level 2 (default 1.1)
;; (setq dracula-height-title-1 1.15)
;; ;; Adjust font size of titles level 3 (default 1.0)
;; (setq dracula-height-title-1 1.05)
;; ;; Adjust font size of document titles (default 1.44)
;; (setq dracula-height-doc-title 1.4)
;; ;; Use less pink and bold on the mode-line and minibuffer (default nil)
;; (setq dracula-alternate-mode-line-and-minibuffer t)

0
mutt/aliases_hd_gm Normal file
View File