diff options
| -rw-r--r-- | .gitignore | 4 | ||||
| -rw-r--r-- | bookmarks | 20 | ||||
| -rw-r--r-- | init.el | 200 | ||||
| -rw-r--r-- | init.el-bak | 7 | ||||
| -rw-r--r-- | init.el-old | 633 | ||||
| -rw-r--r-- | orgsettings.el | 201 | ||||
| -rw-r--r-- | recentf | 32 | ||||
| -rw-r--r-- | savehist | 15 |
8 files changed, 1112 insertions, 0 deletions
diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..47142ea --- /dev/null +++ b/.gitignore @@ -0,0 +1,4 @@ +elpa +\#* +.\#* +auto-save-list/ diff --git a/bookmarks b/bookmarks new file mode 100644 index 0000000..18b6b38 --- /dev/null +++ b/bookmarks @@ -0,0 +1,20 @@ +;;;; 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 . "~/Nextcloud/org/todo.org") + (front-context-string . "** TODO Carry on") + (rear-context-string . "ily\n* Computing\n") + (position . 118)) +("org-refile-last-stored" + (filename . "~/Nextcloud/org/todo.org") + (front-context-string . "** TODO Carry on") + (rear-context-string . "ily\n* Computing\n") + (position . 118)) +("org-capture-last-stored" + (filename . "~/Nextcloud/org/todo.org") + (front-context-string . "* TODO Carry on ") + (rear-context-string . " Jan from work \n") + (position . 1302)) +)
\ No newline at end of file @@ -0,0 +1,200 @@ +;; Minimise! +(scroll-bar-mode -1) +(tool-bar-mode -1) +(tooltip-mode -1) +(menu-bar-mode -1) + + +;; Stop backup files +(setq make-backup-files nil) + +;; Font +(add-to-list 'default-frame-alist '(font . "Fira Code-13")) + +;; Packages +(package-initialize) +(require 'package) +(add-to-list + 'package-archives + '("melpa" . "http://melpa.org/packages/") t) +(add-to-list + 'package-archives + '("org" . "https://orgmode.org/elpa/") t) +(package-initialize) +(add-to-list 'load-path "~/code/elisp/packages/") + +;;Helm +(require 'helm-config) +(helm-mode 1) + +;; Let's use helm-mini which gives us extras +(global-set-key (kbd "C-x b") 'helm-mini) +(global-set-key (kbd "M-x") 'helm-M-x) +(global-set-key (kbd "M-y") 'helm-show-kill-ring) +(setq helm-M-x-fuzzy-match t) ;; optional fuzzy matching for helm-M-x + +(setq helm-buffers-fuzzy-matching t + helm-recentf-fuzzy-match t) + +;; The default "C-x c" is quite close to "C-x C-c", which quits Emacs. +;; Changed to "C-c h". Note: We must set "C-c h" globally, because we +;; cannot change `helm-command-prefix-key' once `helm-config' is loaded. +(global-set-key (kbd "C-c h") 'helm-command-prefix) +(global-unset-key (kbd "C-x c")) +;; (define-key helm-map (kbd "<tab>") 'helm-execute-persistent-action) ; rebind tab to run persistent action +;; (define-key helm-map (kbd "C-i") 'helm-execute-persistent-action) ; make TAB works in terminal +;; (define-key helm-map (kbd "C-z") 'helm-select-action) ; list actions using C-z + +(when (executable-find "curl") + (setq helm-google-suggest-use-curl-p t)) + +(setq helm-split-window-in-side-p t ; open helm buffer inside current window, not occupy whole other window + helm-buffers-fuzzy-matching t ; fuzzy matching buffer names when non--nil + helm-move-to-line-cycle-in-source t ; move to end or beginning of source when reaching top or bottom of source. + helm-ff-search-library-in-sexp t ; search for library in `require' and `declare-function' sexp. + helm-scroll-amount 8 ; scroll 8 lines other window using M-<next>/M-<prior> + helm-ff-file-name-history-use-recentf t) + + +;; Set switch-buffer key +(global-set-key (kbd "C-,") 'switch-to-buffer) + +;; save tonnes of history +(setq savehist-file "~/.emacs.d/savehist") +(savehist-mode +1) +(setq savehist-save-minibuffer-history +1) +(setq savehist-additional-vriables + '(kill-ring + search-ring + regexp-search-ring)) + + +(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. + '(ansi-color-faces-vector + [default default default italic underline success warning error]) + '(ansi-color-names-vector + ["black" "red3" "ForestGreen" "yellow3" "blue" "magenta3" "DeepSkyBlue" "gray50"]) + '(custom-enabled-themes (quote (gruvbox-dark-medium))) + '(custom-safe-themes + (quote + ("8f97d5ec8a774485296e366fdde6ff5589cf9e319a584b845b6f7fa788c9fa9a" default))) + '(helm-completion-style (quote emacs)) + '(org-sort-agenda-notime-is-late nil t) + '(package-selected-packages + (quote + (yasnippet company-lsp company lsp-ui go-autocomplete lsp-mode go-mode markdown-mode gruvbox-theme helm org cider slime evil)))) +(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. + ) + +;; load org settings +;;(load "/home/lemon/.emacs.d/orgsettings.el") + +(setq inferior-lisp-program "/usr/bin/sbcl") +(setq slime-contribs '(slime-fancy)) + +;; Org mode set up +(global-set-key "\C-cl" 'org-store-link) +(global-set-key "\C-ca" 'org-agenda) +(global-set-key "\C-cb" 'org-iswitchb) +(global-set-key "\C-cc" 'org-capture) + +;;date style +(setq calendar-date-style "european") + +;; basic agenda stuff +(setq org-directory "~/Nextcloud/org") +(setq org-agenda-files '("~/Nextcloud/org")) +(setq org-default-notes-file (concat org-directory "/refile.org")) +(setq diary-file "~/Nextcloud/org/diary") +(setq org-agenda-include-diary t) +(setq org-agenda-skip-deadline-if-done t) +(setq org-reverse-note-order t) +(setq org-sort-agenda-notime-is-late nil) + +;; use fast selection +(setq org-use-fast-todo-selection t) + +;; switch state without normal processing +(setq org-treat-S-cursor-todo-selection-as-state-change nil) + +;; Capture shit +(define-key global-map "\C-cc" 'org-capture) +(setq org-default-notes-file "~/Nextcloud/org/refile.org") +(setq org-capture-templates + (quote (("t" "Todo" entry (file "~/Nextcloud/org/todo.org") + "* TODO %?") + ("j" "Journal" entry (file+datetree "~/Nextcloud/org/journal.org") + "* %?\nEntered on %U\n %i\n %a") + ("e" "Emacs Tip" entry (file+headline "~/Nextcloud/org/emacs-tips.org" "Emacs Tips") + "* %?\n %i\n %a")))) + +(setq org-todo-keywords + (quote ((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d)") + (sequence "WAITING(w@/!)" "HOLD(h@/!)" "|" "CANCELLED(c@/!)" "PHONE" "MEETING")))) + +(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)))) + +;; tag stuff automatically dependent on a change of state +(setq org-todo-state-tags-triggers + (quote (("CANCELLED" ("CANCELLED" . t)) + ("WAITING" ("WAITING" . t)) + ("HOLD" ("WAITING") ("HOLD" . t)) + (done ("WAITING") ("HOLD")) + ("TODO" ("WAITING") ("CANCELLED") ("HOLD")) + ("NEXT" ("WAITING") ("CANCELLED") ("HOLD")) + ("DONE" ("WAITING") ("CANCELLED") ("HOLD"))))) + +;; Format string for displaying dates in the daily/weekly agenda +;; and in the timeline. +;;(setq org-agenda-format-date +;; (concat ; "\n" +;; +;; ;; (make-string (1- (window-width)) (string-to-char "_")))) +;; (make-string 65 (string-to-char " ")) +;; "_" +;; ;; (make-string 1 ?\u25AE) +;; )) + + ;; Faces for specific Priorities (#A, #B and #C). + (setq org-priority-faces + '((?A . (:foreground "#CC0000" :background "#FFE3E3")) + (?B . (:foreground "#64992C" :background "#EBF4DD")) + (?C . (:foreground "#64992C" :background "#FFFFFF")))) + +;; use a single archive file for org +(setq org-archive-location "~/Nextcloud/org/archive.org::* From %s") + +;; refiling properly (or generally because everything is included) +(setq org-refile-targets (quote ((nil :maxlevel . 9) + (org-agenda-files :maxlevel . 9)))) + +(setq org-ellipsis "...") +;; END OF ORG MODE STUFF + +;; custom commands on agenda buffer +(setq org-agenda-custom-commands + (quote (("N" "Agenda and NEXT TODOs" + ((agenda "") + (todo "NEXT"))) + ("y" "Agenda and All TODOS" + ((agenda "") + (alltodo "")))))) + +(require 'evil) +(evil-mode 0) diff --git a/init.el-bak b/init.el-bak new file mode 100644 index 0000000..b368a93 --- /dev/null +++ b/init.el-bak @@ -0,0 +1,7 @@ +(when (>= emacs-major-version 24) + (require 'package) + (add-to-list + 'package-archives + '("melpa" . "http://melpa.org/packages/") + t) + (package-initialise)) diff --git a/init.el-old b/init.el-old new file mode 100644 index 0000000..4d541e5 --- /dev/null +++ b/init.el-old @@ -0,0 +1,633 @@ +;;; Package --- Summary + +;;; Commentary: + +;;; Code: +(package-initialize) + +;; Make sure `emacs-leuven.el' is in your `load-path'. +;;(add-to-list 'load-path "/home/lemon/code/github/emacs-leuven") +;;(setq leuven-elpa-ignored-packages '(git-commit-mode)) + +;; get zz, zt from vim etc in emacs - from http://www.emacswiki.org/emacs/RecenterLikeVi +(defun line-to-top-of-window () + "Shift current line to the top of the window- i.e. zt in Vim" + (interactive) + (set-window-start (selected-window) (point)) +) + +(defun line-to-bottom-of-window () + "Shift current line to the botom of the window- i.e. zb in Vim" + (interactive) + (line-to-top-of-window) + (scroll-down (- (window-height) 3)) +) + +(defun ctrl-e-in-vi (n) + (interactive "p") + (scroll-up n)) + +(defun ctrl-y-in-vi (n) + (interactive "p") + (scroll-down n)) + +(global-set-key "\M-n" 'ctrl-e-in-vi) +(global-set-key "\M-p" 'ctrl-y-in-vi) +(global-set-key "\C-x\C-a\C-a" 'line-to-top-of-window) +(global-set-key "\C-x\C-r" 'line-to-bottom-of-window) + + ;; Treat undo history as a tree. + (with-eval-after-load "undo-tree-autoloads" + + ;; Enable Global-Undo-Tree mode. + (global-undo-tree-mode 1)) + + (with-eval-after-load "undo-tree" + + (with-eval-after-load "diminish-autoloads" + (diminish 'undo-tree-mode)) + + ;; Display times relative to current time in visualizer. + (setq undo-tree-visualizer-relative-timestamps t) + + ;; Display time-stamps by default in undo-tree visualizer. + (setq undo-tree-visualizer-timestamps t) ; Toggle time-stamps display using `t'. + + ;; Display diff by default in undo-tree visualizer. + (setq undo-tree-visualizer-diff t) ; Toggle the diff display using `d'. + + (define-key undo-tree-map (kbd "C-/") nil) + + ;; (defalias 'redo 'undo-tree-redo) + (global-set-key (kbd "C-S-z") #'undo-tree-redo) + (global-set-key (kbd "<S-f11>") #'undo-tree-redo)) + + +;; Require it as normal. +;;(require 'emacs-leuven) +(load-file "/home/lemon/code/github/emacs-leuven/org-custom-agenda-views.el") + + +;; enable znc (which is sitting on bobbins server 46.101.17.241) +(require 'znc) + +(defun email-buffer () + "Send region as the body of an email." + (interactive) + (let ((content (buffer-string))) + (compose-mail) + (message-goto-body) + (insert content) + (message-goto-to))) + +;;let's switch off global highlight mode - this doesn't switch it off! +(global-hl-line-mode 0) + +;;line number mode-line +(line-number-mode 1) + +;;switch off company mode +(company-mode) + +;;set cursor colour +(set-cursor-color "#ffffff") +(setq-default cursor-type 'box) + +(setq custom-file "~/.emacs.d/lisp/emacs-custom.el") +(load custom-file) + +;; delete region with a keystroke +(global-set-key (kbd "M-a") 'delete-region) + +;; enable encryption of files +;; to enable in org mode, include # -*- mode:org; epa-file-encrypt-to: ("me@mydomain.com") -*- as first line of file +;; where email is id of key. When you open, you'll need your passphrase, and when you save it will encrypt automatically +;; the org file should be saved with a .gpg suffix. +(require 'epa-file) +(epa-file-enable) + +(when (>= emacs-major-version 24) + (require 'package) + (add-to-list + 'package-archives + '("melpa" . "http://melpa.org/packages/") + t) + (package-initialize)) + +(setq ad-redefinition-action 'accept) + + +;; Place your settings here, which can override the settings of Emacs-Leuven. + +;; I needed this to sort out a bad bug when emacs +;; was hanging whilst I tried to launch emacs - fixed on 29 October by +;; checking out https://github.com/emacs-helm/helm/issues/1000 +;; (setq tramp-ssh-controlmaster-options +;; (concat +;; "-o ControlMaster=auto" +;; "-o ControlPath='tramp.%%C -o ControlPersist=no")) + +;; ledger-mode +(autoload 'ledger-mode "ledger-mode" "A major mode for Ledger" t) +(add-to-list 'load-path + (expand-file-name "/path/to/ledger/source/lisp/")) +(add-to-list 'auto-mode-alist '("\\.ledger$" . ledger-mode)) +(setq ledger-reconcile-default-commodity "£") + +;; add my own lisp directory to .emacs.d +(add-to-list 'load-path "~/.emacs.d/lisp") + +;; load org settings +(load "orgsettings.el") + +;; load mu4e settings +(load "mu4esettings.el") + +;; for displaying emoji? +;; Symbola is a font I installed on the Debian system on 8 November 2015 +(emoji-fontset-enable "Symbola") + +;; CLOJURE STUFF (from https://github.com/flyingmachine/emacs-for-clojure/blob/master/customizations/elisp-editing.el) +;; Automatically load paredit when editing a lisp file +;; More at http://www.emacswiki.org/emacs/ParEdit +(autoload 'enable-paredit-mode "paredit" "Turn on pseudo-structural editing of Lisp code." t) +(add-hook 'emacs-lisp-mode-hook #'enable-paredit-mode) +(add-hook 'eval-expression-minibuffer-setup-hook #'enable-paredit-mode) +(add-hook 'ielm-mode-hook #'enable-paredit-mode) +(add-hook 'lisp-mode-hook #'enable-paredit-mode) +(add-hook 'lisp-interaction-mode-hook #'enable-paredit-mode) +(add-hook 'scheme-mode-hook #'enable-paredit-mode) + + +;;;; +;; Clojure (from https://github.com/flyingmachine/emacs-for-clojure/blob/master/customizations/setup-clojure.el) +;; To the next ;;END +;;;; + +;; Enable paredit for Clojure +(add-hook 'clojure-mode-hook 'enable-paredit-mode) + +;; This is useful for working with camel-case tokens, like names of +;; Java classes (e.g. JavaClassName) +(add-hook 'clojure-mode-hook 'subword-mode) + +;; A little more syntax highlighting +(require 'clojure-mode-extra-font-locking) + +;; syntax hilighting for midje +(add-hook 'clojure-mode-hook + (lambda () + (setq inferior-lisp-program "lein repl") + (font-lock-add-keywords + nil + '(("(\\(facts?\\)" + (1 font-lock-keyword-face)) + ("(\\(background?\\)" + (1 font-lock-keyword-face)))) + (define-clojure-indent (fact 1)) + (define-clojure-indent (facts 1)))) + +;;;; +;; Cider +;;;; + +;; provides minibuffer documentation for the code you're typing into the repl +(add-hook 'cider-mode-hook 'cider-turn-on-eldoc-mode) + +;; go right to the REPL buffer when it's finished connecting +(setq cider-repl-pop-to-buffer-on-connect t) + +;; When there's a cider error, show its buffer and switch to it +(setq cider-show-error-buffer t) +(setq cider-auto-select-error-buffer t) + +;; Where to store the cider history. +(setq cider-repl-history-file "~/.emacs.d/cider-history") + +;; Wrap when navigating history. +(setq cider-repl-wrap-history t) + +;; enable paredit in your REPL +(add-hook 'cider-repl-mode-hook 'paredit-mode) + +;; Use clojure mode for other extensions +(add-to-list 'auto-mode-alist '("\\.edn$" . clojure-mode)) +(add-to-list 'auto-mode-alist '("\\.boot$" . clojure-mode)) +(add-to-list 'auto-mode-alist '("\\.cljs.*$" . clojure-mode)) +(add-to-list 'auto-mode-alist '("lein-env" . enh-ruby-mode)) + + +;; key bindings +;; these help me out with the way I usually develop web apps +(defun cider-start-http-server () + (interactive) + (cider-load-current-buffer) + (let ((ns (cider-current-ns))) + (cider-repl-set-ns ns) + (cider-interactive-eval (format "(println '(def server (%s/start))) (println 'server)" ns)) + (cider-interactive-eval (format "(def server (%s/start)) (println server)" ns)))) + + +(defun cider-refresh () + (interactive) + (cider-interactive-eval (format "(user/reset)"))) + +(defun cider-user-ns () + (interactive) + (cider-repl-set-ns "user")) + +(eval-after-load 'cider + '(progn + (define-key clojure-mode-map (kbd "C-c C-v") 'cider-start-http-server) + (define-key clojure-mode-map (kbd "C-M-r") 'cider-refresh) + (define-key clojure-mode-map (kbd "C-c u") 'cider-user-ns) + (define-key cider-mode-map (kbd "C-c u") 'cider-user-ns))) + +;; eldoc-mode shows documentation in the minibuffer when writing code +;; http://www.emacswiki.org/emacs/ElDoc +(add-hook 'emacs-lisp-mode-hook 'turn-on-eldoc-mode) +(add-hook 'lisp-interaction-mode-hook 'turn-on-eldoc-mode) +(add-hook 'ielm-mode-hook 'turn-on-eldoc-mode) + +;;END OF LOTS OF CLOJURE CONFIG +;; +;; +;; +;; + +;; JAVASCRIPT and COFFEESCRIPT STUFF (from https://github.com/flyingmachine/emacs-for-clojure/blob/master/customizations/setup-js.el) +;; javascript / html +(add-to-list 'auto-mode-alist '("\\.js$" . js-mode)) +(add-hook 'js-mode-hook 'subword-mode) +(add-hook 'html-mode-hook 'subword-mode) +(setq js-indent-level 2) +(eval-after-load "sgml-mode" + '(progn + (require 'tagedit) + (tagedit-add-paredit-like-keybindings) + (add-hook 'html-mode-hook (lambda () (tagedit-mode 1))))) + + +;; coffeescript +(add-to-list 'auto-mode-alist '("\\.coffee.erb$" . coffee-mode)) +(add-hook 'coffee-mode-hook 'subword-mode) +(add-hook 'coffee-mode-hook 'highlight-indentation-current-column-mode) +(add-hook 'coffee-mode-hook + (defun coffee-mode-newline-and-indent () + (define-key coffee-mode-map "\C-j" 'coffee-newline-and-indent) + (setq coffee-cleanup-whitespace nil))) + + +;; END OF JAVASCRIPT AND COFFEESCRIPT STUFF +;; +;; +;; + +;; SHELL INTEGRATION STUFF (from https://github.com/flyingmachine/emacs-for-clojure/blob/master/customizations/shell-integration.el#L1) +;; Sets up exec-path-from shell +;; https://github.com/purcell/exec-path-from-shell +(when (memq window-system '(mac ns)) + (exec-path-from-shell-initialize) + (exec-path-from-shell-copy-envs + '("PATH"))) +;; END + +;; SWITCH OFF CURSOR BLINKING +(blink-cursor-mode 0) + + +;; trying to disable the mouse click which is infuriating me - this doesn't work. Further investigation needed +(global-unset-key [down-mouse-1]) + + + +;; calendar proper Monday start +(setq calendar-week-start-day 1) + +;; autopair +(require 'autopair) + +;; deft +(require 'deft) +(setq deft-directory "~/ownCloud/Textnotes") +(setq deft-use-filename-as-title t) +;; (setq deft-extension "txt") ; if I want default new files to be org files +;; (setq deft-text-mode 'org-mode) ; use org-mode to view the razzers + +;; alternative setup of deft to allow for deft seeing all file extensions from +;; http://emacs.stackexchange.com/questions/3429/how-to-support-multiple-extensions-in-deft +(setq deft-extension "") +(defvar deft-default-extension "txt") +(defun my/deft-default-extension (orig-func &rest args) + (let ((deft-extension deft-default-extension)) + (apply orig-func args))) +(advice-add 'deft-new-file :around #'my/deft-default-extension) + +;; give us a system clipboard +(setq x-select-enable-clipboard t) + +;; I don't want to type yes or no +(defalias 'yes-or-no-p 'y-or-n-p) + +;;gnus sorting the summary buffer and putting the date in the headline +(setq gnus-summary-line-format "%U%d%R%z%I%(%[%4L: %-23,23f%]%) %s\n") +(setq gnus-thread-sort-functions + '(gnus-thread-sort-by-most-recent-date)) +;; how the group buffer looks +(setq gnus-group-line-format "%M%S%p%P%5y:%B%(%g%)\n") + +;; guide-key config - SWITCHED OFF +(require 'guide-key) +(setq guide-key/guide-key-sequence '("C-x r" "C-x 4" "C-c")) +(guide-key-mode 1) ; Enable guide-key-mode + +;; enable flycheck by default (on the fly linting) +;; SWITCH IT OFF FOR A BIT: (add-hook 'after-init-hook #'global-flycheck-mode) + +;; python stuff - go this from a big pacman update on 18 Dec +(autoload 'python-mode "python-mode.el" "Python mode." t) +(setq auto-mode-alist (append '(("/.*\.py\'" . python-mode)) auto-mode-alist)) + +;; TRAMP stuff +;; using sshx as default as it works better than ssh +(setq tramp-default-method "sshx") + +;; use iPython as the python interpreter in emacs +(setq + python-shell-interpreter "ipython" + python-shell-interpreter-args "" + python-shell-prompt-regexp "In \\[[0-9]+\\]: " + python-shell-prompt-output-regexp "Out\\[[0-9]+\\]: " + python-shell-completion-setup-code + "from IPython.core.completerlib import module_completion" + python-shell-completion-module-string-code + "';'.join(module_completion('''%s'''))\n" + python-shell-completion-string-code + "';'.join(get_ipython().Completer.all_completions('''%s'''))\n") + +;; virtualenv config +(require 'virtualenvwrapper) +(venv-initialize-interactive-shells) ;; if you want interactive shell support +(venv-initialize-eshell) ;; if you want eshell support +(setq venv-location "/home/lemon/.envs") + +;; set my virtualenv dir for helm-pydoc +(setq helm-virtualenv ".envs") + +;;w3m config +(require 'w3m) + (setq browse-url-browser-function 'w3m-browse-url) + (autoload 'w3m-browse-url "w3m" "Ask a WWW browser to show a URL." t) + ;; optional keyboard short-cut +(global-set-key "\C-xm" 'browse-url-at-point) + +;; my keybind to open a link in an external browser +(define-key w3m-mode-map (kbd "\C-c B") 'w3m-external-view-this-url) + +;; open the current document in external browser +(define-key w3m-mode-map (kbd "\C-c b") 'w3m-external-view-current-url) + +;;change w3m user-agent to android +(setq w3m-user-agent "Mozilla/5.0 (Linux; U; Android 2.3.3; zh-tw; HTC_Pyramid Build/GRI40) AppleWebKit/533.1 (KHTML, like Gecko) Version/4.0 Mobile Safari/533.") + +;;quick access reddit +(defun reddit (reddit) + "Opens the REDDIT in w3m-new-session" + (interactive (list + (read-string "Enter the reddit (default: emacs): " nil nil "emacs" nil))) + (browse-url (format "http://m.reddit.com/r/%s" reddit))) + +;; wrap tags in HTML from http://ergoemacs.org/emacs/emacs_html_insert_tags.html +(defun wrap-html-tag (tagName) + "Add a tag to beginning and ending of current word or text selection." + (interactive "sEnter tag name: ") + (let (p1 p2 inputText) + (if (use-region-p) + (progn + (setq p1 (region-beginning) ) + (setq p2 (region-end) ) + ) + (let ((bds (bounds-of-thing-at-point 'symbol))) + (setq p1 (car bds) ) + (setq p2 (cdr bds) ) ) ) + + (goto-char p2) + (insert "</" tagName ">") + (goto-char p1) + (insert "<" tagName ">") + )) + + +;;Use AUCTex +(load "auctex.el" nil t t) +;;(load "preview-latex.el" nil t t) +(setq TeX-auto-save t) +(setq TeX-parse-self t) +(setq-default TeX-master nil) +(setq TeX-PDF-mode t); PDF mode (rather than DVI-mode) + + +;; make sure calendar is using European date format, not the fucking American one +(setq calendar-date-style (quote european)) + +;; global visual line mode +(global-visual-line-mode 1) + +;; mouse avoidance +(mouse-avoidance-mode 'banish) + +;; column numbering +(column-number-mode 1) + +;; paren mode +(show-paren-mode 1) + +;; use recentf to open recent files (from http://www.masteringemacs.org/article/find-files-faster-recent-files-package) +(require 'recentf) + +;; get rid of `find-file-read-only' and replace it with something +;; more useful. +;;(global-set-key (kbd "C-x C-r") 'ido-recentf-open) + +;; enable recent files mode. +(recentf-mode t) + +; 50 files ought to be enough. +(setq recentf-max-saved-items 50) + +;;(defun ido-recentf-open () +;; "Use `ido-completing-read' to \\[find-file] a recent file" +;; (interactive) +;; (if (find-file (ido-completing-read "Find recent file: " recentf-list)) +;; (message "Opening file...") +;; (message "Aborting"))) + +;; fix scrolling +(setq mouse-wheel-follow-mouse 't) +(setq mouse-wheel-scroll-amount '(1 ((shift) . 1))) + +;; browser shit - ovrriding what's up there for now +(setq browse-url-browser-function 'browse-url-generic) +(setq browse-url-generic-program "uzbl-browser") + +;; save tonnes of history +(setq savehist-file "~/.emacs.d/savehist") +(savehist-mode +1) +(setq savehist-save-minibuffer-history +1) +(setq savehist-additional-vriables + '(kill-ring + search-ring + regexp-search-ring)) + +;; markdown mode - bits from http://www.wisdomandwonder.com/wordpress/wp-content/uploads/2014/03/C3F.html +(autoload 'markdown-mode "markdown-mode" + "Major mode for editing Markdown files" t) +(add-to-list 'auto-mode-alist '("README\\.md\\.markdown\\'" . gfm-mode)) + +;; stash backups somewhere more convenient (from https://github.com/correl/dotfiles/blob/master/.emacs.d/emacs.org) +(setq backup-directory-alist '(("." . "~/.emacs.d/backups"))) + +;; save lots of backups (from https://github.com/correl/dotfiles/blob/master/.emacs.d/emacs.org) +(setq delete-old-versions -1) +(setq version-control t) +(setq vc-make-backup-files t) +(setq auto-save-file-name-transforms '((".*" "~/.emacs.d/auto-save-list/" t))) + +;; if we want line numbers and syntax highlighting from http://www.wisdomandwonder.com/wordpress/wp-content/uploads/2014/03/C3F.html +;; (global-linum-mode 1) +(global-font-lock-mode 1) + +;; use SOLARIZED +;;(load-theme 'solarized-dark t) + +;; other themes +;; (load-theme 'misterioso t) +(load-theme 'tango-dark t) + +;; save history of minibuffer commands +(savehist-mode 1) + + + +;; evil mode is here +;; getting good shit from http://juanjoalvarez.net/es/detail/2014/sep/19/vim-emacsevil-chaotic-migration-guide/ +;; (require 'evil) +;; (evil-mode 1) +;; (setq evil-emacs-state-cursor '("red" box)) +;; (setq evil-normal-state-cursor '("green" box)) +;; (setq evil-visual-state-cursor '("orange" box)) +;; (setq evil-insert-state-cursor '("red" bar)) +;; (setq evil-replace-state-cursor '("red" bar)) +;; (setq evil-operator-state-cursor '("red" hollow)) + +;; my keybindings +(global-set-key (kbd "C-c u") 'browse-url) + + +;; START HELM STUFF (IT IS INSTALLED IN ~/code/github-code +;; [Facultative] Only if you have installed async. +(add-to-list 'load-path "/home/lemon/code/github/helm") +(add-to-list 'load-path "/home/lemon/code/github/emacs-async") +(require 'helm-config) +(helm-mode 1) + +;; The default "C-x c" is quite close to "C-x C-c", which quits Emacs. +;; Changed to "C-c h". Note: We must set "C-c h" globally, because we +;; cannot change `helm-command-prefix-key' once `helm-config' is loaded. +(global-set-key (kbd "C-c h") 'helm-command-prefix) +(global-unset-key (kbd "C-x c")) +;; (define-key helm-map (kbd "<tab>") 'helm-execute-persistent-action) ; rebind tab to run persistent action +;; (define-key helm-map (kbd "C-i") 'helm-execute-persistent-action) ; make TAB works in terminal +;; (define-key helm-map (kbd "C-z") 'helm-select-action) ; list actions using C-z + +(when (executable-find "curl") + (setq helm-google-suggest-use-curl-p t)) + +(setq helm-split-window-in-side-p t ; open helm buffer inside current window, not occupy whole other window + helm-buffers-fuzzy-matching t ; fuzzy matching buffer names when non--nil + helm-move-to-line-cycle-in-source t ; move to end or beginning of source when reaching top or bottom of source. + helm-ff-search-library-in-sexp t ; search for library in `require' and `declare-function' sexp. + helm-scroll-amount 8 ; scroll 8 lines other window using M-<next>/M-<prior> + helm-ff-file-name-history-use-recentf t) + +(global-set-key (kbd "M-x") 'helm-M-x) +(global-set-key (kbd "C-x b") 'helm-mini) +(global-set-key (kbd "C-x C-f") 'helm-find-files) + +;; use ack-grep when grepping in shit (following a C-x-C-f) +(when (executable-find "ack-grep") + (setq helm-grep-default-command "ack-grep -Hn --no-group --no-color %e %p %f" + helm-grep-default-recurse-command "ack-grep -H --no-group --no-color %e %p %f")) +;; extra shit in code +(semantic-mode 1) +;; find man page of shit at point +(add-to-list 'helm-sources-using-default-as-input 'helm-source-man-pages) +;; fucking awsome occur shit in helm +(global-set-key (kbd "C-c h o") 'helm-occur) + + +;; make sure you can delete selected region +(delete-selection-mode 1) + +;; powerline for emacs +(require 'powerline) +(powerline-vim-theme) + +;; enable buffers to auto-update when file on disk changes +(global-auto-revert-mode t) + +(require 'ace-jump-mode) + (define-key global-map (kbd "C-c SPC") 'ace-jump-mode) + +;; +;; enable a more powerful jump back function from ace jump mode +;; +(autoload + 'ace-jump-mode-pop-mark + "ace-jump-mode" + "Ace jump back:-)" + t) +(eval-after-load "ace-jump-mode" + '(ace-jump-mode-enable-mark-sync)) +(define-key global-map (kbd "C-x SPC") 'ace-jump-mode-pop-mark) + +;; ace search +(ace-isearch-mode +1) +(global-ace-isearch-mode +1) + +;; use Projectile - currently not using it +(projectile-global-mode) + + +;; END OF HELM STUFF + +;; python Jedi! +(add-hook 'python-mode-hook 'jedi:setup) +(setq jedi:complete-on-dot t) ; optional +;;(add-to-list 'ac-sources 'ac-source-jedi-direct) + + + +;; config for mutt to use emacs (from emacs wikie mutt in emacs) +(server-start) +(add-to-list 'auto-mode-alist '("/mutt" . mail-mode)) + +;; get rid of annoying buffer key +(global-unset-key "\C-x\C-b") + +;; Start with ido mode by default +(require 'ido) +(setq ido-enable-flex-matching t) +(setq ido-everywhere t) +(setq ido-create-new-buffer 'always) +(setq ido-file-extensions-order '(".org" ".txt" ".py" ".emacs" ".xml" ".html" ".el" ".ini" ".cfg" ".cnf")) +(ido-mode 1) + +;; Get rid of the menu bar and toolbar and scroll bar +(menu-bar-mode -1) +(tool-bar-mode -1) +(scroll-bar-mode -1) + +;; start to scratch +(setq inhibit-startup-screen +1) +(put 'narrow-to-region 'disabled nil) diff --git a/orgsettings.el b/orgsettings.el new file mode 100644 index 0000000..51efcb8 --- /dev/null +++ b/orgsettings.el @@ -0,0 +1,201 @@ +;;; package --- Summary + +;;; Commentary: +;; Putting org settings into its separate file. + +;;; Code: +(require 'org) + +;; remove tags from the agenda view +(setq org-agenda-remove-tags t) + +;; START indented +(setq org-startup-indented t) + +;; START folded +(setq org-startup-folded t) + +;; START hidden asterisks +(setq org-hide-leading-stars t) + +;; basic agenda stuff +(setq org-directory "~/Nextcloud/org") +(setq org-agenda-files "~/Nextcloud/org/agenda-files.org") +(setq org-default-notes-file (concat org-directory "/refile.org")) +(setq diary-file "~/Nextcloud/org/emacs-diary") +;; set day view as default +(setq org-agenda-span 'day) + +(define-key global-map "\C-cl" 'org-store-link) +(define-key global-map "\C-ca" 'org-agenda) +(setq org-log-done 'time) +(setq org-agenda-include-diary t) +(setq org-return-follows-link t) ;; not working! use C-c C-o instead - that is from org and it works + + +;; enable python for Org-babel (doing source code stuff in org mode) + (org-babel-do-load-languages + 'org-babel-load-languages + '((emacs-lisp . nil) + (python . t))) + +;; Enable state logging enable for the TODO state in org mode i.e. the "!" part + (setq org-todo-keywords + (quote + ((sequence "TODO(t!)" "NEXT(n!)" "READ(r!)" "WRITE(o!)" "FIXME(f!)" "BUG(b!)" "|" "DONE(d!)") + (sequence "WAITING(w@/!)" "SOMEDAY(s@/!)" "|" "CANCELLED(c@/!)")))) + +;; Capture shit +(define-key global-map "\C-cc" 'org-capture) +(setq org-default-notes-file "~/Nextcloud/org/refile.org") +(setq org-capture-templates + (quote (("z" "Todo" entry (file "~/Nextcloud/org/todo.org") + "* TODO %?") + ("o" "On-call log" entry (file "~/Nextcloud/org/oncall-logs.org") + "* TODO %? :oncall:\nDetails of alert: \nEntered on %U\n") + ("j" "Journal" entry (file+datetree "~/Nextcloud/org/journal.org") + "* %?\nEntered on %U\n %i\n %a") + ("e" "Emacs Tip" entry (file+headline "~/Nextcloud/org/emacs-tips.org" "Emacs Tips") + "* %?\n %i\n %a") + ("r" "RAM TODO/FIXME/BUG" entry (file+headline "~/Nextcloud/org/ram.org" "Tasks") + "* %?\n%a")))) + + +;; test for colourising TODO tags +(setq org-tag-faces + (quote (("code" :foreground "green yellow") + ("read" :foreground "orange") + ("urgent" :foreground "red" :background "white" :underline t) + ("laptop" :foreground "orange") + ("home" :foreground "orchid") + ("work" :foreground "tomaton" :underline t) + ("ram" :foreground "orange red") + ("brainstorm" :foreground "aquamarine") + ("research" :foreground "mint cream") + ("oncall" :foreground "yellow" :weight bold) + ("repeating" :foreground "pale turquoise") + ("phone" :foreground "hot pink")))) + +;; remap some keys +;; (global-set-key (kbd "<f1>") 'org-agenda) + +;; colourize the headline tags +(setq org-todo-keyword-faces + (quote (("TODO" :foreground "red" :weight bold) + ("NEXT" :foreground "cyan" :weight bold) + ("FIXME" :foreground "yellow" :weight bold) + ("BUG" :foreground "yellow" :weight bold) + ("DONE" :foreground "forest green" :weight bold) + ("READ" :foreground "orange" :weight bold) + ("WRITE" :foreground "magenta" :weight bold) + ("CANCELLED" :foreground "forest green" :weight bold) + ("WAITING" :foreground "MediumOrchid1" :weight bold) + ("SOMEDAY" :foreground "forest green" :weight bold)))) + +;; use fast selection +(setq org-use-fast-todo-selection t) + +;; getting much of this stuff form http://doc.norang.ca/org-mode.html by the way +;; use shift and arrows to change stage a TODO item without logging the change, which is great for fixing mistakes +(setq org-treat-S-cursor-todo-selection-as-state-change nil) + +;; tag stuff automatically dependent on a change of state +(setq org-todo-state-tags-triggers + (quote (("CANCELLED" ("CANCELLED" . t)) + ("WAITING" ("WAITING" . t)) + ("HOLD" ("WAITING") ("HOLD" . t)) + (done ("WAITING") ("HOLD")) + ("TODO" ("WAITING") ("CANCELLED") ("HOLD")) + ("NEXT" ("WAITING") ("CANCELLED") ("HOLD")) + ("DONE" ("WAITING") ("CANCELLED") ("HOLD"))))) + + +;; START ---STUFF PULLED FROM emacs-leuven.el ----START +;; REMOVE THIS SECTION AND LOAD emacs-leuven.el again in init.el +;; if you want to go back to full emacs-leuven config + +;; Settings for time grid for agenda display. +(setq org-agenda-time-grid '((daily remove-match) + "" + (0600 0800 1000 1200 1400 1600 1800 2000 2200))) + +;; String for the current time marker in the agenda. +(setq org-agenda-current-time-string "Right now") + +;; 10.4.3 Sorting structure for the agenda items of a single day. +(setq org-agenda-sorting-strategy ; custom value + '((agenda time-up category-up priority-down effort-down) + (todo category-up priority-down effort-down) + (tags category-up priority-down effort-down) + (search category-up))) + +;; Format string for displaying dates in the daily/weekly agenda +;; and in the timeline. +(setq org-agenda-format-date + (concat ; "\n" + "%Y-%m-%d" " %a " + ;; (make-string (1- (window-width)) (string-to-char "_")))) + (make-string 65 (string-to-char " ")) + "_" + ;; (make-string 1 ?\u25AE) + )) + + ;; Faces for specific Priorities (#A, #B and #C). + (setq org-priority-faces + '((?A . (:foreground "#CC0000" :background "#FFE3E3")) + (?B . (:foreground "#64992C" :background "#EBF4DD")) + (?C . (:foreground "#64992C" :background "#FFFFFF")))) + +;; END ---STUFF PULLED FROM emacs-leuven.el ----END + +(setq org-agenda-custom-commands + (quote (("N" "Agenda and NEXT TODOs" + ((agenda "") + (todo "NEXT"))) + ("y" "Agenda and All TODOS" + ((agenda "") + (alltodo "")))) + +;; BELOW IS A BIGGER EXAMPLE OF THE FUNC ABOVE +;; setting custom views in the agenda ------- learned a lot about elist doing this! +;; (setq org-agenda-custom-commands +;; (quote (("A" "Agenda and All TODOs" +;; ((agenda "") +;; (alltodo ""))) +;; ("N" "Agenda and NEXT TODOs" +;; ((agenda "") +;; (todo "NEXT"))) +;; ("G" "Agenda, NEXT and All TODOs" +;; ((agenda "") +;; (todo "NEXT") +;; (alltodo ""))) +;; ("R" "Agenda and READ TODOs" +;; ((agenda "") +;; (todo "READ"))) +;; ("c" "Code BUG/FIXME" +;; ((agenda "") +;; (todo "BUG") +;; (todo "FIXME"))) +;; ("o" "On-call logs" +;; ((agenda "") +;; (tags "oncall" +;; (quote (org-agenda-overriding-header "On Call Logs"))))) +;; ("r" "RAM stuff" +;; ((agenda "") +;; (tags "ram" +;; (quote (org-agenda-overriding-header "RAM Stuff"))))) +;; ("H" "Agenda and Habits" +;; ((agenda "") +;; (tags-todo "STYLE=\"habit\"" +;; (quote (org-agenda-overriding-header "Habits")))))))) + +;; use a single archive file for org +(setq org-archive-location "~/Nextcloud/org/archive/archive.org::* From %s") + +;; refiling properly (or generally because everything is included) +(setq org-refile-targets (quote ((nil :maxlevel . 9) + (org-agenda-files :maxlevel . 9)))) + +(setq org-ellipsis "...") + +;; END OF ORG MODE STUFF @@ -0,0 +1,32 @@ +;;; Automatically generated by ‘recentf’ on Tue Dec 10 08:27:48 2019. + +(setq recentf-list + '( + "/home/lemon/.emacs.d/init.el" + "/home/lemon/Nextcloud/org/emacs-tips.org" + "/home/lemon/Nextcloud/org/todo.org" + "/home/lemon/Desk.html" + "/home/lemon/go/src/github.com/hammerheadlemon/datamaps-go/reader/reader.go" + "/home/lemon/Nextcloud/org/emacs-diary" + "/home/lemon/Nextcloud/org/refile.org" + "/home/lemon/Nextcloud/org/ram.org" + "/home/lemon/Nextcloud/org/projects.org" + "/home/lemon/Nextcloud/org/personal.org" + "/home/lemon/Nextcloud/org/journal.org" + "/home/lemon/Nextcloud/org/archive.org" + "/home/lemon/Nextcloud/org/agenda-files.org" + "/home/lemon/.emacs.d/bookmarks" + "/home/lemon/.emacs.d/elpa/dash-functional-20191109.1327/dash-functional-autoloads.el" + "/home/lemon/.emacs.d/elpa/yasnippet-20191030.1331/yasnippet-autoloads.el" + "/home/lemon/.emacs.d/elpa/s-20180406.808/s-autoloads.el" + "/home/lemon/.emacs.d/elpa/company-20191206.33/company-autoloads.el" + "/home/lemon/.emacs.d/elpa/go-autocomplete-20150904.240/go-autocomplete-autoloads.el" + "/home/lemon/.emacs.d/elpa/auto-complete-20170125.245/auto-complete-autoloads.el" + )) + +(setq recentf-filter-changer-current 'nil) + + +;; Local Variables: +;; coding: utf-8-emacs +;; End: diff --git a/savehist b/savehist new file mode 100644 index 0000000..ef47697 --- /dev/null +++ b/savehist @@ -0,0 +1,15 @@ +;; -*- mode: emacs-lisp; coding: utf-8-unix -*- +;; Minibuffer history file, automatically generated by ‘savehist’. + +(setq savehist-minibuffer-history-variables '(helm-M-x-input-history search-ring regexp-history helm-occur-history org-read-date-history evil-ex-history extended-command-history yes-or-no-p-history file-name-history read-expression-history minibuffer-history)) +(setq helm-M-x-input-history '("org-time-st" "global-auto" "revert" "toggle" "eval" "dired" "toggle-tru" "eval" "expand-reg" "org-export" "eval")) +(setq search-ring '("nex" "archive" "diary" "helm" "f" "#" "Go" "lsp-mode")) +(setq regexp-history '("org" "delete")) +(setq helm-occur-history '("org" "agenda" "delete")) +(setq org-read-date-history '("15:00 " " " "15:00 " "10:00+1 " " " "14:00-15:00 " " " "2020-02-10 " "2020-02-28 " "2020-02-07 ")) +(setq evil-ex-history '(#("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("list-packages" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("package-install" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15)) #("package-install lsp-ui" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("list-packages" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13)) #("package-install" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15)) #("package-install go-mode" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22) 22 23 (ex-index 23)) #("w" 0 1 (ex-index 1)) #("customize-themes" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16)) #("package-install gruvbox" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22) 22 23 (ex-index 23)) #("w" 0 1 (ex-index 1)) #("org-insert-link" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15)) #("w" 0 1 (ex-index 1)) #("customize-themes" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16)) #("helm-occur" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10)) #("occur" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5)) #("w" 0 1 (ex-index 1)) #("e ~/Nextcloud/org/archive/emacs-tips.org" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22) 22 23 (ex-index 23) 23 24 (ex-index 24) 24 25 (ex-index 25) 25 26 (ex-index 26) 26 27 (ex-index 27) 27 28 (ex-index 28) 28 29 (ex-index 29) 29 30 (ex-index 30) 30 31 (ex-index 31) 31 32 (ex-index 32) 32 33 (ex-index 33) 33 34 (ex-index 34) 34 35 (ex-index 35) 35 36 (ex-index 36) 36 37 (ex-index 37) 37 38 (ex-index 38) 38 39 (ex-index 39) 39 40 (ex-index 40)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("sp" 0 1 (ex-index 1) 1 2 (ex-index 2)) #("diary-mode" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10)) #("helm-mini" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9)) #("helm-find-files-history" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22) 22 23 (ex-index 23)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("sp" 0 1 (ex-index 1) 1 2 (ex-index 2)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("vs" 0 1 (ex-index 1) 1 2 (ex-index 2)) #("w" 0 1 (ex-index 1)) #("W" 0 1 (ex-index 1)) #("w" 0 1 (ex-index 1)) #("diary-mode" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10)) #("customize" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9)) #("q" 0 1 (ex-index 1)) #("w" 0 1 (ex-index 1)) #("calendar-set-date-style" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22) 22 23 (ex-index 23)) #("w" 0 1 (ex-index 1)) #("diary-mode" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10)) #("eval-buffer" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11)) #("w" 0 1 (ex-index 1)) #("q" 0 1 (ex-index 1)) #("w" 0 1 (ex-index 1)) #("q" 0 1 (ex-index 1)) #("helm-find-files-history" 0 1 (ex-index 1) 1 2 (ex-index 2) 2 3 (ex-index 3) 3 4 (ex-index 4) 4 5 (ex-index 5) 5 6 (ex-index 6) 6 7 (ex-index 7) 7 8 (ex-index 8) 8 9 (ex-index 9) 9 10 (ex-index 10) 10 11 (ex-index 11) 11 12 (ex-index 12) 12 13 (ex-index 13) 13 14 (ex-index 14) 14 15 (ex-index 15) 15 16 (ex-index 16) 16 17 (ex-index 17) 17 18 (ex-index 18) 18 19 (ex-index 19) 19 20 (ex-index 20) 20 21 (ex-index 21) 21 22 (ex-index 22) 22 23 (ex-index 23)))) +(setq extended-command-history '("org-time-stamp" "global-auto-revert-mode" "revert-buffer" "toggle-truncate-lines" "eval-buffer" "dired-undo" "expand-region-abbrevs" "org-export-dispatch" "package-install" "list-packages" "package-install" "markdown-mode" "list-packages" "org-toggle-sticky-agenda" "calendar" "recover-file")) +(setq yes-or-no-p-history '("yes" "no" "yes" "no" "yes")) +(setq file-name-history '("~/Nextcloud/org/archive.org" #("~/.emacs.d/init.el" 1 2 (match-part "/home/lemon/.emacs.d/init.el") 2 18 (match-part "/home/lemon/.emacs.d/init.el")) "~/Nextcloud/org/projects.org" #("~/go/src/github.com/hammerheadlemon/datamaps-go/reader/reader.go" 1 2 (match-part "/home/lemon/go/src/github.com/hammerheadlemon/datamaps-go/reader/reader.go") 2 64 (match-part "/home/lemon/go/src/github.com/hammerheadlemon/datamaps-go/reader/reader.go")) "~/Nextcloud/Journal/presents.md" "~/Nextcloud/org/archive/journal.org" "~/.emacs.d/orgsettings.el" "~/.emacs.d/init.el-old" "~/Nextcloud/org/emacs-diary" "~/Nextcloud/org/refile.org" "~/.emacs.d/#init.el#")) +(setq minibuffer-history '("agen" "stamp" "all" "/home/lemon/.emac" "ag" "todo" "global-auto" "ini" "global-auto" "todo" #("*" 0 1 (fontified t org-category "archive" face org-level-1)) "pers" #("archive" 0 3 (fontified t face font-lock-comment-face) 3 7 (fontified t face font-lock-comment-face)) "ini" "arc" "/home/lemon/Nextcloud/org" "ini" "This one!" "https://www.amazon.co.uk/dp/B015OR7T66/ref=twister_B01K7N9XKW?_encoding=UTF8&psc=1" "ini" "agen" "this link" "https://www.linuxbabe.com/cloud-storage/access-nextcloud-files-webdav-ubuntu" "todo.org" #("journal" 0 7 (dired-filename t mouse-face highlight help-echo "mouse-2: visit this file in other window" fontified t)) #("*" 0 1 (fontified t org-category "todo" face org-level-1)) "todo" "Comp" "/home/lemon/Nextcloud/org" "ini" "/home/lemon/Nextcloud/org/" "projects.org" "pro" "/home/lemon/Nextc" "dired" "ini" "Per" "age" "person" "agen" "pro" "truncate-par" "wrap" "ini" "init.el" "sc" "switch" "tips" "ini" "scr" "proj" "/home/lemon/.emacs.d/" "export" "age" "reader.go" "go-mode" "reader" #("t" 0 1 (fontified t)) "*Packages*" "Comp" #("lsp-mode" 0 8 (tabulated-list-entry [("lsp-mode" face package-name font-lock-face package-name follow-link t package-desc #s(package-desc lsp-mode (20191208 140) "LSP mode" ((emacs (25 1)) (dash (2 14 1)) (dash-functional (2 14 1)) (f (0 20 0)) (ht (2 0)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0))) tar "melpa" nil ((:commit . "bf089d24754684b558d67bc5f8f5e37b05ae5ca9") (:keywords "languages") (:authors ("Vibhav Pant, Fangrui Song, Ivan Yonchovski")) (:maintainer "Vibhav Pant, Fangrui Song, Ivan Yonchovski") (:url . "https://github.com/emacs-lsp/lsp-mode")) nil) action package-menu-describe-package) #("20191208.140" 0 12 (font-lock-face package-status-available)) #("available" 0 9 (font-lock-face package-status-available)) #("melpa" 0 5 (font-lock-face package-status-available)) #("LSP mode" 0 8 (font-lock-face package-description))] tabulated-list-id #s(package-desc lsp-mode (20191208 140) "LSP mode" ((emacs (25 1)) (dash (2 14 1)) (dash-functional (2 14 1)) (f (0 20 0)) (ht (2 0)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0))) tar "melpa" nil ((:commit . "bf089d24754684b558d67bc5f8f5e37b05ae5ca9") (:keywords "languages") (:authors ("Vibhav Pant, Fangrui Song, Ivan Yonchovski")) (:maintainer "Vibhav Pant, Fangrui Song, Ivan Yonchovski") (:url . "https://github.com/emacs-lsp/lsp-mode")) nil) tabulated-list-column-name "Package" action package-menu-describe-package package-desc #s(package-desc lsp-mode (20191208 140) "LSP mode" ((emacs (25 1)) (dash (2 14 1)) (dash-functional (2 14 1)) (f (0 20 0)) (ht (2 0)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0))) tar "melpa" nil ((:commit . "bf089d24754684b558d67bc5f8f5e37b05ae5ca9") (:keywords "languages") (:authors ("Vibhav Pant, Fangrui Song, Ivan Yonchovski")) (:maintainer "Vibhav Pant, Fangrui Song, Ivan Yonchovski") (:url . "https://github.com/emacs-lsp/lsp-mode")) nil) follow-link t font-lock-face package-name face package-name category default-button button (t))) #("t" 0 1 (fontified t)) "tips" "org-capture" "Comp" "Link which is also in Pocket" "https://arenzana.org/2019/12/emacs-go-mode-revisited/" "Insert" "ini" "dash-fun" "ini" "in" #("lsp-mode" 0 8 (button (t) category default-button face package-name font-lock-face package-name follow-link t package-desc #s(package-desc lsp-mode (20191208 140) "LSP mode" ((emacs (25 1)) (dash (2 14 1)) (dash-functional (2 14 1)) (f (0 20 0)) (ht (2 0)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0))) tar "melpa" nil ((:commit . "bf089d24754684b558d67bc5f8f5e37b05ae5ca9") (:keywords "languages") (:authors ("Vibhav Pant, Fangrui Song, Ivan Yonchovski")) (:maintainer "Vibhav Pant, Fangrui Song, Ivan Yonchovski") (:url . "https://github.com/emacs-lsp/lsp-mode")) nil) action package-menu-describe-package tabulated-list-column-name "Package" tabulated-list-id #s(package-desc lsp-mode (20191208 140) "LSP mode" ((emacs (25 1)) (dash (2 14 1)) (dash-functional (2 14 1)) (f (0 20 0)) (ht (2 0)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0))) tar "melpa" nil ((:commit . "bf089d24754684b558d67bc5f8f5e37b05ae5ca9") (:keywords "languages") (:authors ("Vibhav Pant, Fangrui Song, Ivan Yonchovski")) (:maintainer "Vibhav Pant, Fangrui Song, Ivan Yonchovski") (:url . "https://github.com/emacs-lsp/lsp-mode")) nil) tabulated-list-entry [("lsp-mode" face package-name font-lock-face package-name follow-link t package-desc #s(package-desc lsp-mode (20191208 140) "LSP mode" ((emacs (25 1)) (dash (2 14 1)) (dash-functional (2 14 1)) (f (0 20 0)) (ht (2 0)) (spinner (1 7 3)) (markdown-mode (2 3)) (lv (0))) tar "melpa" nil ((:commit . "bf089d24754684b558d67bc5f8f5e37b05ae5ca9") (:keywords "languages") (:authors ("Vibhav Pant, Fangrui Song, Ivan Yonchovski")) (:maintainer "Vibhav Pant, Fangrui Song, Ivan Yonchovski") (:url . "https://github.com/emacs-lsp/lsp-mode")) nil) action package-menu-describe-package) #("20191208.140" 0 12 (font-lock-face package-status-available)) #("available" 0 9 (font-lock-face package-status-available)) #("melpa" 0 5 (font-lock-face package-status-available)) #("LSP mode" 0 8 (font-lock-face package-description))])) "list-pac" "yasnipp" "company-ls" "company" "lsp-ui" "ini" "scra" "autocomplete" "Emacs" "reader" "read" #("auto-complete" 0 13 (tabulated-list-entry [("auto-complete" face package-name font-lock-face package-name follow-link t package-desc #s(package-desc auto-complete (20170125 245) "Auto Completion for GNU Emacs" ((popup (0 5 0)) (cl-lib (0 5))) nil nil "/home/lemon/.emacs.d/elpa/auto-complete-20170125.245" nil nil) action package-menu-describe-package) #("20170125.245" 0 12 (font-lock-face package-status-dependency)) #("dependency" 0 10 (font-lock-face package-status-dependency)) "" #("Auto Completion for GNU Emacs" 0 29 (font-lock-face package-description))] tabulated-list-id #s(package-desc auto-complete (20170125 245) "Auto Completion for GNU Emacs" ((popup (0 5 0)) (cl-lib (0 5))) nil nil "/home/lemon/.emacs.d/elpa/auto-complete-20170125.245" nil nil) tabulated-list-column-name "Package" action package-menu-describe-package package-desc #s(package-desc auto-complete (20170125 245) "Auto Completion for GNU Emacs" ((popup (0 5 0)) (cl-lib (0 5))) nil nil "/home/lemon/.emacs.d/elpa/auto-complete-20170125.245" nil nil) follow-link t font-lock-face package-name face package-name category default-button button (t))) #("go-autocomplete" 0 15 (face font-lock-constant-face fontified t)) "ini" "/home/lemon/go/src/github.com/hammerheadlemon/datamaps-go/reader/" "lsp-mode" "go-mode" "jou" "archi" "pres" "prese" "customize-the" "ini" "gruv" "scr" #("****" 0 3 (face org-level-4 fontified t) 3 4 (face org-level-4 fontified t)) "/home/lemon/Nextcloud/org/archive/jour")) +(setq evil-jumps-history 'nil) |