Skip to content

Instantly share code, notes, and snippets.

View fix-pkg.el
(dolist (dir (directory-files "elpa" t "^[^.]"))
(let ((name (file-name-nondirectory dir)))
(when (string-match "\\(.+\\)-[^-]+\\'" name)
(let ((file (expand-file-name (concat (match-string 1 name) "-pkg.el") dir)))
(with-temp-file file
(save-excursion (insert-file-contents file))
(when (looking-at "(define-package \\([^\" ]+\\)")
(message "Fixing %s..." file)
(replace-match "\"\\1\"" t nil nil 1)
(message "Fixing %s...done" file)))))))

[Verifying my OpenPGP key: openpgp4fpr:7e108e46f316cba0ce3c8d20fc61b7237c7155b7]

View banana
You wanted a banana but what you got was a gorilla holding the banana and the entire jungle.

Keybase proof

I hereby claim:

  • I am tarsius on github.
  • I am tarsius ( on keybase.
  • I have a public key ASAL_MB_f6G-29k2QhzK37eS3ETydpXfeymPHKQrgoo2Qwo

To claim this, I am signing this object:

tarsius /
Created Feb 10, 2016
Magit 2.5 released
tarsius /
Created Jan 18, 2016
Magit 2.4 released