org-config/packages.el at master · et2010/org-config · GitHub

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
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
;;; packages.el --- jw Layer packages File for Spacemacs
;;
;; Copyright (c) 2012-2014 Sylvain Benner
;; Copyright (c) 2014-2015 Sylvain Benner & Contributors
;;
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3

(setq jw-packages
  '(
    boxquote
    cdlatex
    ledger-mode
    visual-fill-column
    zotelo
    ))

(if (eq system-type 'windows-nt)
    (push 'ssh-agency jw-packages)
  (push 'bbdb jw-packages))

(defun jw/init-bbdb ()
  "Initialize bbdb"
  (use-package bbdb
    :defer t))

(defun jw/init-boxquote ()
  "Initialize boxquote"
  (use-package boxquote
    :defer t))

(defun jw/init-cdlatex ()
  "Initialize cdlatex"
  (use-package cdlatex
    :defer t
    :init (add-hook 'org-mode-hook 'turn-on-org-cdlatex)))

(defun jw/init-ledger-mode ()
  "Initialize ledger-mode"
  (use-package ledger-mode
    :defer t))

(defun jw/init-zotelo ()
  "Initialize zotelo"
  (use-package zotelo
    :defer t))

(defun jw/init-ssh-agency ()
  "Initialize ssh-agency"
  (use-package ssh-agency
    :if (eq system-type 'windows-nt)
    :defer t
    :config
    (progn
      (setq ssh-agency-keys '("~/.ssh/github-key"
                             "~/.ssh/bitbucket-key")))))

(defun jw/init-visual-fill-column ()
  "Initialize visual-fill-column"
  (use-package visual-fill-column
    :init
    (add-hook 'visual-line-mode-hook 'visual-fill-column-mode)
    ;; 最好将word-wrap的值设为nil，否则中英文混排时换行都发生在英文单词结束处，非常难看。
    (add-hook 'visual-line-mode-hook
              '(lambda ()
                (set (make-local-variable 'word-wrap) nil)))))

;; Often the body of an initialize function uses `use-package'
;; For more info on `use-package', see readme:
;; https://github.com/jwiegley/use-package