| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120 |
- ;;; packages.el --- chicken-dotfiles layer packages file for Spacemacs.
- ;;
- ;; Copyright (c) 2012-2017 Sylvain Benner & Contributors
- ;;
- ;; Author: Eiyeron <eiyeron@Ducktop>
- ;; URL: https://github.com/syl20bnr/spacemacs
- ;;
- ;; This file is not part of GNU Emacs.
- ;;
- ;;; License: GPLv3
- ;;; Commentary:
- ;; See the Spacemacs documentation and FAQs for instructions on how to implement
- ;; a new layer:
- ;;
- ;; SPC h SPC layers RET
- ;;
- ;;
- ;; Briefly, each package to be installed or configured by this layer should be
- ;; added to `chicken-dotfiles-packages'. Then, for each package PACKAGE:
- ;;
- ;; - If PACKAGE is not referenced by any other Spacemacs layer, define a
- ;; function `chicken-dotfiles/init-PACKAGE' to load and initialize the package.
- ;; - Otherwise, PACKAGE is already referenced by another Spacemacs layer, so
- ;; define the functions `chicken-dotfiles/pre-init-PACKAGE' and/or
- ;; `chicken-dotfiles/post-init-PACKAGE' to customize the package as it is loaded.
- ;;; Code:
- (defconst chicken-dotfiles-packages
- '(
- org
- org-agenda
- org-bullets
- )
- "The list of Lisp packages required by the chicken-dotfiles layer.
- Each entry is either:
- 1. A symbol, which is interpreted as a package to be installed, or
- 2. A list of the form (PACKAGE KEYS...), where PACKAGE is the
- name of the package to be installed or loaded, and KEYS are
- any number of keyword-value-pairs.
- The following keys are accepted:
- - :excluded (t or nil): Prevent the package from being loaded
- if value is non-nil
- - :location: Specify a custom installation location.
- The following values are legal:
- - The symbol `elpa' (default) means PACKAGE will be
- installed using the Emacs package manager.
- - The symbol `local' directs Spacemacs to load the file at
- `./local/PACKAGE/PACKAGE.el'
- - A list beginning with the symbol `recipe' is a melpa
- recipe. See: https://github.com/milkypostman/melpa#recipe-format"
- )
- (defun chicken-dotfiles/post-init-org-bullets()
- (use-package org-bullets
- :defer t
- :init
- (setq org-bullets-bullet-list '("◉" "○" "⬡" "⬢" "■" "□" "◈" "◇"))
- )
- )
- (defun chicken-dotfiles/post-init-org-agenda()
- (use-package org-agenda
- :defer t
- :init
- (setq org-agenda-to-appt t)
- (setq org-agenda-include-diary t)
- (setq org-agenda-files (list
- "~/Notes/Agenda/birthdays.org"
- ;; GTD
- "~/Notes/inbox.org" "~/Notes/gtd.org" "~/Notes/tickler.org"))
- )
- )
- (defun chicken-dotfiles/post-init-org()
- (use-package org
- :defer t
- :init
- (setq org-cycle-level-faces nil)
- (setq org-modules
- '(org-bbdb org-bibtex org-docview org-gnus org-info org-irc org-mhe org-mouse org-rmail org-w3m org-drill))
- (setq org-todo-keywords '((sequence "TODO" "WAITING" "IN PROGRESS" "|" "DONE" "CANCELLED")))
- ; GTD inspired by https://emacs.cafe/emacs/orgmode/gtd/2017/06/30/orgmode-gtd.html
- (setq org-capture-templates '(("t" "Todo [inbox]" entry
- (file+headline "~/Notes/inbox.org" "Tasks")
- "* TODO %i%?")
- ("T" "Tickler" entry
- (file+headline "~/Notes/tickler.org" "Tickler")
- "* %i%? \n %U")
- ;; Media
- ("A" "Artist" entry
- (file+headline "~/Notes/inbox.org" "Music")
- "* TODO %i%? \n %U")
- ("S" "Series" entry
- (file+headline "~/Notes/inbox.org" "Series")
- "* TODO %i%? \n %U"))
- )
-
- (setq org-directory "~/Notes")
- (setq org-default-notes-file "~/Notes/inbox.org" )
- (setq org-refile-targets '(("~/Notes/gtd.org" :maxlevel . 3)
- ("~/Notes/backlog.org" :level . 2)
- ("~/Notes/tickler.org" :maxlevel . 2)))
- )
- )
- ;;; packages.el ends here
|