dot-emacs-dot-d  Check-in [6500e18339]

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Commit WIP just in case I accidentally tangle when using Org again.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256:6500e1833905ce78181683c2c7627743c548669a389e26861a7b6404773e6ced
User & Date: jaccarmac 2018-08-03 21:07:48
Context
2018-08-07
17:46
ox-pandoc + bug-hunter check-in: 37422fa115 user: jaccarmac tags: trunk
2018-08-03
21:07
Commit WIP just in case I accidentally tangle when using Org again. check-in: 6500e18339 user: jaccarmac tags: trunk
2018-03-17
01:56
Fix the source of hoon-mode. check-in: edeb0b2dec user: jaccarmac tags: trunk
Changes

Added .fossil-settings/clean-glob.



>
1
*.elc

Added TODO.















>
>
>
>
>
>
>
1
2
3
4
5
6
7
unicode-fonts by rolandwalker
persistent-soft also by him
eshell with cd
use portacle as example
ox-pandoc
easy way to use my forks temporarily
bug-hunter Malabarba/elisp-bug-hunter

Changes to init.el.

1
2

3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

18
19
20
21
22

23
24
25
26
27
28
29
30
31
32

33
34
35
36



37
38
39
40
41
42
43
..
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
..
89
90
91
92
93
94
95
96

97
98




99
100
101
102
103
104
105
...
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
...
154
155
156
157
158
159
160
161



162
163
164
165
166
167
168
...
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240



241
242
243



244
245
246
247
248
249
250
...
270
271
272
273
274
275
276










277
278
279
280
281
282
283


284
285
286
287
288


289
290
291
292
293
294
295
...
315
316
317
318
319
320
321



















322
;;; -*- lexical-binding: t; -*-


(setf network-security-level 'high)

(setf default-directory "~")

(eval-and-compile
  (package-initialize)
  (setf quelpa-update-melpa-p nil)
  (unless (require 'quelpa nil t)
    (with-temp-buffer
      (url-insert-file-contents
       "https://raw.github.com/quelpa/quelpa/master/bootstrap.el")
      (eval-buffer)))
  (add-to-list 'package-selected-packages 'quelpa))

(eval-when-compile

  (quelpa 'use-package)
  (add-to-list 'package-selected-packages 'use-package)
  (require 'use-package)

  (quelpa '(quse-package :fetcher github :repo "jaccarmac/quse-package"))

  (add-to-list 'package-selected-packages 'quse-package)
  (require 'quse-package))

(require 'bind-key)

(quse-package better-defaults)

(use-package saveplace :init
  (when (fboundp 'save-place-mode) (save-place-mode)))


(ido-everywhere)
(setf ido-auto-merge-work-directories-length -1)

(quse-package ido-completing-read+



  :init
  (ido-ubiquitous-mode)
  (setf org-completion-use-ido t)
  (setf magit-completing-read-function 'magit-ido-completing-read))

(quse-package ido-yes-or-no :init (ido-yes-or-no-mode))

................................................................................

(setq-default inhibit-splash-screen t)

(quse-package undo-tree :init (global-undo-tree-mode))

(quse-package powerline :init (powerline-default-theme))

(quse-package grandshell-theme :config (load-theme 'grandshell t))

(quse-package rainbow-delimiters)

(add-to-list 'default-frame-alist '(font . "Fantasque Sans Mono 11"))

(quse-package emojify :config (global-emojify-mode))

(quse-package smartparens
  :init
  (smartparens-global-mode)
  (smartparens-global-strict-mode)
................................................................................
(quse-package (org :fetcher git
                   :url "https://code.orgmode.org/bzg/org-mode.git"
                   :files ("lisp/*.el"
                           "contrib/lisp/*.el"
                           "doc/dir"
                           "doc/*.texi"))
  :init
  (setq-default major-mode 'org-mode))


(quse-package ox-reveal)





(setf org-latex-pdf-process (list "latexmk -f -pdf %f"))

(add-to-list 'org-latex-classes
             '("apa6"
               "\\documentclass[man,12pt]{apa6}"
               ("\\section{%s}" . "\\section*{%s}")
................................................................................
  :init (add-to-list 'auto-mode-alist
                     '("ledger/.*\\.dat\\'" . ledger-mode)))

(quse-package password-store)

(quse-package projectile
  :init
  (projectile-global-mode)
  (setf projectile-switch-project-action 'projectile-dired)
  (setf projectile-indexing-method 'alien))

(quse-package magit)

(quse-package ssh-agency)

................................................................................
    '(progn
       (add-to-list 'ac-modes 'cider-mode)
       (add-to-list 'ac-modes 'cider-repl-mode)
       (add-to-list 'ac-modes 'cider-clojure-interaction-mode))))

(quse-package slime
  :init
  (setf inferior-lisp-program "ros run")



  (setf common-lisp-hyperspec-root (getenv "HYPERSPEC_ROOT"))
  (setf slime-contribs '(slime-fancy))
  (slime-setup))

(quse-package ac-slime
  :init
  (add-hook 'slime-mode-hook 'set-up-slime-ac)
................................................................................

(quse-package (protobuf-mode :fetcher github
                             :repo "google/protobuf"
                             :files ("editors/protobuf-mode.el")))

(quse-package yaml-mode)

(let ((global-venv-location "~/.virtualenvs"))
  (setf python-environment-directory global-venv-location)
  (setf venv-location global-venv-location))

(quse-package jedi
  :init
  (add-hook 'python-mode-hook 'jedi:setup)
  (setf jedi:complete-on-dot t)
  (setf jedi:use-shortcuts t))

(quse-package virtualenvwrapper



  :init
  (venv-initialize-interactive-shells)
  (venv-initialize-eshell))




(quse-package (hoon-mode :fetcher github :repo "urbit/hoon-mode.el"))

(quse-package (gdscript-mode :fetcher github
                             :repo "jaccarmac/gdscript-mode"
                             :branch "fix-line-endings"))

................................................................................

(quse-package erlang)

(quse-package rust-mode
  :init (setf rust-format-on-save t))

(quse-package cargo :init (add-hook 'rust-mode-hook 'cargo-minor-mode))











(quse-package toml-mode)

(quse-package mediawiki)

(quse-package (xelb :fetcher github :repo "ch11ng/xelb"))
(quse-package (exwm :fetcher github :repo "ch11ng/exwm")


  :config
  (require 'exwm-config)
  (exwm-config-default))

(quse-package erc-twitch


  :config
  (erc-twitch-enable))

(use-package zone
  :init
  (defun lock-screen () ; TODO: pick a random function, show it, zone on that
    "Lock screen using (zone) and xtrlock
................................................................................

(quse-package fsharp-mode)

(quse-package pdf-tools
  :config
  (pdf-tools-install))




















(customize-save-variable 'package-selected-packages package-selected-packages)


>





<









>

<



>
|
|








>




>
>
>







 







|



|







 







|
>

|
>
>
>
>







 







|







 







|
>
>
>







 







<
<
<
<







>
>
>


|
>
>
>







 







>
>
>
>
>
>
>
>
>
>







>
>





>
>







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>

1
2
3
4
5
6
7
8

9
10
11
12
13
14
15
16
17
18
19

20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
..
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
..
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
...
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
...
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
...
236
237
238
239
240
241
242




243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
...
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
...
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
;;; -*- lexical-binding: t; -*-

(defvar network-security-level)
(setf network-security-level 'high)

(setf default-directory "~")

(eval-and-compile

  (setf quelpa-update-melpa-p nil)
  (unless (require 'quelpa nil t)
    (with-temp-buffer
      (url-insert-file-contents
       "https://raw.github.com/quelpa/quelpa/master/bootstrap.el")
      (eval-buffer)))
  (add-to-list 'package-selected-packages 'quelpa))

(eval-when-compile
  (package-initialize)
  (quelpa 'use-package)

  (require 'use-package)

  (quelpa '(quse-package :fetcher github :repo "jaccarmac/quse-package"))
  (require 'quse-package))
(add-to-list 'package-selected-packages 'use-package)
(add-to-list 'package-selected-packages 'quse-package)

(require 'bind-key)

(quse-package better-defaults)

(use-package saveplace :init
  (when (fboundp 'save-place-mode) (save-place-mode)))

(declare-function ido-everywhere "ido")
(ido-everywhere)
(setf ido-auto-merge-work-directories-length -1)

(quse-package ido-completing-read+
  :preface
  (defvar org-completion-use-ido)
  (defvar magit-completing-read-function)
  :init
  (ido-ubiquitous-mode)
  (setf org-completion-use-ido t)
  (setf magit-completing-read-function 'magit-ido-completing-read))

(quse-package ido-yes-or-no :init (ido-yes-or-no-mode))

................................................................................

(setq-default inhibit-splash-screen t)

(quse-package undo-tree :init (global-undo-tree-mode))

(quse-package powerline :init (powerline-default-theme))

(quse-package dracula-theme :config (load-theme 'dracula t))

(quse-package rainbow-delimiters)

(push '(font . "Iosevka Term 11") default-frame-alist)

(quse-package emojify :config (global-emojify-mode))

(quse-package smartparens
  :init
  (smartparens-global-mode)
  (smartparens-global-strict-mode)
................................................................................
(quse-package (org :fetcher git
                   :url "https://code.orgmode.org/bzg/org-mode.git"
                   :files ("lisp/*.el"
                           "contrib/lisp/*.el"
                           "doc/dir"
                           "doc/*.texi"))
  :init
  (setq-default major-mode 'org-mode)
  (use-package org-tempo))

(quse-package htmlize)

(quse-package (ox-reveal :fetcher github
                         :repo "jaccarmac/org-reveal"
                         :branch "fix-org-structure-template-alist"))

(setf org-latex-pdf-process (list "latexmk -f -pdf %f"))

(add-to-list 'org-latex-classes
             '("apa6"
               "\\documentclass[man,12pt]{apa6}"
               ("\\section{%s}" . "\\section*{%s}")
................................................................................
  :init (add-to-list 'auto-mode-alist
                     '("ledger/.*\\.dat\\'" . ledger-mode)))

(quse-package password-store)

(quse-package projectile
  :init
  (projectile-mode)
  (setf projectile-switch-project-action 'projectile-dired)
  (setf projectile-indexing-method 'alien))

(quse-package magit)

(quse-package ssh-agency)

................................................................................
    '(progn
       (add-to-list 'ac-modes 'cider-mode)
       (add-to-list 'ac-modes 'cider-repl-mode)
       (add-to-list 'ac-modes 'cider-clojure-interaction-mode))))

(quse-package slime
  :init
  (setf slime-lisp-implementations '((sbcl ("ros" "run" "-L" "sbcl-bin"))
                                     (ccl ("ros" "run" "-L" "ccl-bin"))
                                     (abcl ("ros" "run" "-L" "abcl-bin"))
                                     (ecl ("ros" "run" "-L" "ecl"))))
  (setf common-lisp-hyperspec-root (getenv "HYPERSPEC_ROOT"))
  (setf slime-contribs '(slime-fancy))
  (slime-setup))

(quse-package ac-slime
  :init
  (add-hook 'slime-mode-hook 'set-up-slime-ac)
................................................................................

(quse-package (protobuf-mode :fetcher github
                             :repo "google/protobuf"
                             :files ("editors/protobuf-mode.el")))

(quse-package yaml-mode)





(quse-package jedi
  :init
  (add-hook 'python-mode-hook 'jedi:setup)
  (setf jedi:complete-on-dot t)
  (setf jedi:use-shortcuts t))

(quse-package virtualenvwrapper
  :preface
  (defvar python-environment-directory)
  (defvar venv-location)
  :init
  (venv-initialize-interactive-shells)
  (venv-initialize-eshell)
  (let ((global-venv-location "~/.virtualenvs"))
    (setf python-environment-directory global-venv-location)
    (setf venv-location global-venv-location)))

(quse-package (hoon-mode :fetcher github :repo "urbit/hoon-mode.el"))

(quse-package (gdscript-mode :fetcher github
                             :repo "jaccarmac/gdscript-mode"
                             :branch "fix-line-endings"))

................................................................................

(quse-package erlang)

(quse-package rust-mode
  :init (setf rust-format-on-save t))

(quse-package cargo :init (add-hook 'rust-mode-hook 'cargo-minor-mode))

;; TODO check if this works

(quse-package lsp-mode)

(quse-package lsp-ui :init (add-hook 'rust-mode-hook 'lsp-ui-mode))

(quse-package lsp-rust :init (setf lsp-rust-rls-command '("rustup" "run" "nightly" "rls")))

;; end TODO check

(quse-package toml-mode)

(quse-package mediawiki)

(quse-package (xelb :fetcher github :repo "ch11ng/xelb"))
(quse-package (exwm :fetcher github :repo "ch11ng/exwm")
  :preface
  (declare-function exwm-config-default "exwm")
  :config
  (require 'exwm-config)
  (exwm-config-default))

(quse-package erc-twitch
  :preface
  (declare-function erc-twitch-enable "erc-twitch")
  :config
  (erc-twitch-enable))

(use-package zone
  :init
  (defun lock-screen () ; TODO: pick a random function, show it, zone on that
    "Lock screen using (zone) and xtrlock
................................................................................

(quse-package fsharp-mode)

(quse-package pdf-tools
  :config
  (pdf-tools-install))

(savehist-mode)

(quse-package golden-ratio
  :init
  (golden-ratio-mode)
  (define-advice select-window
      (:after (window &optional no-record) golden-ratio-resize-window)
    (golden-ratio)
    nil))

(quse-package switch-window
  :bind (("C-x o" . switch-window)
         ("C-x 1" . switch-window-then-maximize)
         ("C-x 2" . switch-window-then-split-below)
         ("C-x 3" . switch-window-then-split-right)
         ("C-x 0" . switch-window-then-delete)))

(quse-package zig-mode)

(customize-save-variable 'package-selected-packages package-selected-packages)