Skip to content

Instantly share code, notes, and snippets.

Package Management

Initialize package management

(require 'package)
(setq package-list '(use-package req-package))

(setq package-archives '(("MELPA" . "http://melpa.org/packages/")
                         ("ELPA" . "http://tromey.com/elpa/")
                         ("gnu"  . "http://elpa.gnu.org/packages/"))
      load-prefer-newer t
(require 'org-build)
(defun knowt-elisp-directory ()
(concat (getenv "KNOWT_SOURCE_DIRECTORY") "elisp/"))
(message (format "knowt-elisp-directory: %s" (knowt-elisp-directory)))
(defun user-init-file () (concat (knowt-elisp-directory) "elisp" "init.el"))
(message (format "user-init-file: %s" (user-init-file)))
(defun knowt-user-directory ()
(setq package-archives '(("MELPA" . "http://melpa.org/packages/")
("ELPA" . "http://tromey.com/elpa/")
("gnu" . "http://elpa.gnu.org/packages/")))
(package-initialize)
(package-refresh-contents)
(package-install 'use-package)
(package-install 'req-package)
(setq package-archives '(("MELPA" . "http://melpa.org/packages/")
("ELPA" . "http://tromey.com/elpa/")
("gnu" . "http://elpa.gnu.org/packages/")))
(package-initialize)
(package-refresh-contents)
(package-install 'use-package)
(package-install 'req-package)
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
directory-file-name(nil)
make-directory("use-package-20180108.1754/" t)
tar-untar-buffer()
package-untar-buffer("use-package-20180108.1754")
package-unpack([cl-struct-package-desc use-package (20180108 1754) "A configuration macro for simplifying your .ema$
#[256 "\306\307!r\211q\210\310\311\312\313\314^E!\315\"\316$\216\301c\210\317^Z\320\300!\210+\210\211\205^?^@\321\3$
package--check-signature("https://melpa.org/packages/" "use-package-20180108.1754.tar" "use-package-20180108.1754/^$
package-install-from-archive([cl-struct-package-desc use-package (20180108 1754) "A configuration macro for simplif$
mapc(package-install-from-archive ([cl-struct-package-desc use-package (20180108 1754) "A configuration macro for s$
;; available keywords, including combined view
(defun set-todo-keywords ()
(setq org-todo-keywords-1 '("TODO" "DONE" "TODO|DONE")))
;; shows todo list, passing arg to org-todo-list
(defun org-todo-list-current-file (&optional arg)
"Like `org-todo-list', but using only the current buffer's file."
(interactive "P")
(let ((org-agenda-files (list (buffer-file-name (current-buffer)))))
(if (null (car org-agenda-files))
(defun org-todo-list-current-file (&optional arg)
"Like `org-todo-list', but using only the current buffer's file."
(interactive "P")
(let ((org-agenda-files (list (buffer-file-name (current-buffer)))))
(if (null (car org-agenda-files))
(error "%s is not visiting a file" (buffer-name (current-buffer)))
(org-todo-list arg))))
# -*- org-confirm-shell-link-function: nil; org-confirm-elisp-link-function: nil; -*-
# local variables:
# eval: (load-file "knowt-mode.el")
# eval: (knowt-mode)
# end:
#!/usr/bin/env fsharpi
#I "../../../.nuget/packages/hopac/0.3.21/lib/net45/"
#I "../../../.nuget/packages/hopac.extras/0.3.1/lib/net45"
#r "Hopac.Extras"
#r "Hopac.Platform"
#r "Hopac.Core"
#r "Hopac"
open System
#!/usr/bin/env fsharpi
#I "../../../.nuget/packages/hopac/0.3.21/lib/net45/"
#I "../../../.nuget/packages/hopac.extras/0.3.1/lib/net45"
#r "Hopac.Extras"
#r "Hopac.Platform"
#r "Hopac.Core"
#r "Hopac"
open System