Skip to content

Instantly share code, notes, and snippets.

@edenc
Created March 23, 2020 18:51
Show Gist options
  • Save edenc/e0c39f491f74f6a018384ec36f5dc5a1 to your computer and use it in GitHub Desktop.
Save edenc/e0c39f491f74f6a018384ec36f5dc5a1 to your computer and use it in GitHub Desktop.
;; 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.
(package-initialize)
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t)
(add-to-list 'package-archives '("org" . "https://orgmode.org/elpa/") t)
(add-to-list 'load-path "~/.emacs.d/lisp")
(require 'perltidy)
(defalias 'perl-mode 'cperl-mode)
(require 'tj3-mode)
(setq inhibit-splash-screen t)
;; (toggle-frame-fullscreen)
(if (string= (system-name) "glink")
(set-face-attribute 'default nil :height 90))
(if (string= (system-name) "LAPTOP-CBHJ1GHK")
(set-face-attribute 'default nil :height 100))
(global-set-key "\M- " 'hippie-expand)
(global-set-key (kbd "C-c c") 'org-capture)
(global-hl-line-mode)
(global-auto-revert-mode)
; see http://doc.norang.ca/org-mode.html
; Erase all reminders and rebuilt reminders for today from the agenda
(defun bh/org-agenda-to-appt ()
(interactive)
(setq appt-time-msg-list nil)
(org-agenda-to-appt))
; Rebuild the reminders everytime the agenda is displayed
(add-hook 'org-finalize-agenda-hook 'bh/org-agenda-to-appt 'append)
; This is at the end of my .emacs - so appointments are set up when Emacs starts
(bh/org-agenda-to-appt)
; Activate appointments so we get notifications
(appt-activate t)
; If we leave Emacs running overnight - reset the appointments one minute after midnight
(run-at-time "24:01" nil 'bh/org-agenda-to-appt)
(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-names-vector
["#000000" "#8b0000" "#00ff00" "#ffa500" "#7b68ee" "#dc8cc3" "#93e0e3" "#dcdccc"])
'(custom-enabled-themes (quote (gotham)))
'(custom-safe-themes
(quote
("c5ad91387427abc66af38b8d6ea74cade4e3734129cbcb0c34cc90985d06dcb3" "2d835b43e2614762893dc40cbf220482d617d3d4e2c35f7100ca697f1a388a0e" "79485bab8bb220562d4acd003e4b6f1c9005af41e91f81b7a0e89b7e3a301203" "59e82a683db7129c0142b4b5a35dbbeaf8e01a4b81588f8c163bd255b76f4d21" "725a0ac226fc6a7372074c8924c18394448bb011916c05a87518ad4563738668" default)))
'(fci-rule-color "#383838")
'(horizontal-scroll-bar-mode nil)
'(menu-bar-mode nil)
'(org-agenda-custom-commands
(quote
(("p" "Weekly Planning"
((stuck "" nil)
(tags-todo "+TODO=\"TODO\""
((org-agenda-sorting-strategy
(quote
(category-up))))))
((org-agenda-dim-blocked-tasks nil))
nil)
("d" "Daily Planning"
((tags-todo "+TODO=\"SOON\"" nil)
(tags-todo "+TODO=\"NEXT\"" nil))
nil nil)
("w" "Describe command here" tags "+TODO=\"NEXT\""
((org-agenda-dim-blocked-tasks nil)))
("n" "Agenda and all TODOs"
((agenda "" nil)
(alltodo "" nil))
nil))))
'(org-agenda-files (quote ("~/org")))
'(org-agenda-skip-deadline-if-done t)
'(org-agenda-skip-deadline-prewarning-if-scheduled (quote pre-scheduled))
'(org-agenda-skip-scheduled-if-done t)
'(org-agenda-sorting-strategy
(quote
((agenda time-up habit-down priority-down category-keep)
(todo priority-down category-keep)
(tags priority-down category-keep)
(search category-keep))))
'(org-agenda-time-grid
(quote
((daily today require-timed)
nil "......" "----------------")))
'(org-archive-default-command (quote org-archive-to-archive-sibling))
'(org-babel-load-languages
(quote
((emacs-lisp . t)
(dot . t)
(shell . t)
(perl . t)
(plantuml . t))))
'(org-capture-templates
(quote
(("t" "TODO item" entry
(file+headline "~/org/random.org" "random")
(file "~/org/template/todo.org")
:clock-in t :clock-resume t)
("j" "Journal entry" entry
(file+olp+datetree "~/org/journal.org")
(file "~/org/template/journal.org")))))
'(org-columns-default-format "%25ITEM %TODO %Effort{:} %3PRIORITY %TAGS")
'(org-enforce-todo-dependencies t)
'(org-global-properties
(quote
(("Effort_ALL" . "0:05 0:08 0:13 0:21 0:34 0:55 1:29 2:24 3:53"))))
'(org-hide-leading-stars t)
'(org-id-link-to-org-use-id (quote create-if-interactive-and-no-custom-id))
'(org-log-into-drawer t)
'(org-modules
(quote
(org-bbdb org-bibtex org-docview org-eww org-gnus org-habit org-id org-info org-inlinetask org-irc org-mhe org-rmail org-w3m org-checklist)))
'(org-plantuml-jar-path "/usr/share/plantuml/plantuml.jar")
'(org-refile-targets
(quote
((org-agenda-files :todo . "WIP")
(org-agenda-files :todo . "BUCKET"))))
'(org-stuck-projects (quote ("+TODO=\"WIP\"-someday" ("SOON") nil "")))
'(org-tag-alist (quote (("hold" . 104))))
'(org-tag-persistent-alist (quote (("hold" . 104))))
'(org-todo-keywords
(quote
((sequence "TODO(t!)" "NEXT(n!)" "SOON(s!)" "HOLD(h!)" "|" "DONE(d!)" "CANCELLED(c!)" "DUP(u!)" "BAIL(b!)")
(sequence "WIP(w!)" "TRACK(a!)" "|")
(sequence "REMINDER(r!)" "|")
(sequence "BUCKET(k!)" "|"))))
'(org-use-speed-commands t)
'(package-selected-packages
(quote
(haskell-mode cyberpunk-theme gnu-elpa-keyring-update sql-indent js-auto-beautify web-mode yaml-mode fill-column-indicator markdown-mode lorem-ipsum ox-jekyll-md web-beautify magit-popup lua-mode undo-tree magit tj3-mode org-pomodoro cyberpunk-2019-theme org-plus-contrib remember-last-theme gotham-theme)))
'(scroll-bar-mode nil)
'(split-height-threshold nil)
'(tool-bar-mode nil))
(load "~/.emacs-local.el")
(find-file "~/org/random.org")
(put 'downcase-region 'disabled nil)
(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.
'(cperl-array-face ((t (:foreground "#edb443" :weight bold))))
'(cperl-hash-face ((t (:foreground "#c23127" :slant italic :weight bold)))))
;; make xdg-open work from inside eshell
(setq process-connection-type nil)
(add-hook 'text-mode-hook
(lambda () (set-input-method "TeX")))
;; dead keys under xmonad apparently require this to work
(require 'iso-transl)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment