This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# Please see the script's new home: https://github.com/alphapapa/magit.sh |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun key-quiz--shuffle-list (list) | |
"Shuffles LIST randomly, modying it in-place." | |
(dolist (i (reverse (number-sequence 1 (1- (length list))))) | |
(let ((j (random (1+ i))) | |
(tmp (elt list i))) | |
(setf (elt list i) (elt list j)) | |
(setf (elt list j) tmp))) | |
list) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; org-kbd | |
;; (setq org-emphasis-alist '(("%" org-kbd verbatim) | |
;; ("*" bold) | |
;; ("/" italic) | |
;; ("_" underline) | |
;; ("=" org-verbatim verbatim) | |
;; ("~" org-code verbatim) | |
;; ("+" | |
;; (:strike-through t)))) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; NOTE: This has been superseded by `org-sidebar-tree': https://github.com/alphapapa/org-sidebar#org-sidebar-tree-command | |
(defun ap/open-tree-view () | |
"Open a clone of the current buffer to the left, resize it to | |
30 columns, and bind <mouse-1> to jump to the same position in | |
the base buffer." | |
;; http://emacs.stackexchange.com/questions/9530/how-can-i-get-an-org-mode-outline-in-a-2nd-buffer-as-a-dynamic-table-of-contents | |
;; TODO: Make this use navi-mode, which handles most of this already | |
(interactive) | |
(let ((new-buffer-name (concat "<tree>" (buffer-name)))) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; elfeed configuration | |
(use-package elfeed | |
;;;; Keymaps | |
:general | |
(:keymaps '(shr-map) | |
"a" 'pocket-reader-shr-add-link) | |
(:keymaps '(elfeed-show-mode-map elfeed-search-mode-map) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
# ** Vars | |
# *** Emacs version | |
if type emacs26 &>/dev/null | |
then | |
emacs="emacs26" | |
emacsclient="emacsclient26" | |
emacsWindowClass="Emacs" |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun ap/helm-find-files () | |
(interactive) | |
(helm :sources '(ap/helm-source-ivy-views | |
ap/helm-source-current-file-other-buffers | |
helm-source-buffers-list | |
ap/helm-source-files-in-current-dir | |
helm-source-org-recent-headings | |
helm-source-bookmarks | |
ap/helm-source-recentf | |
ap/helm-source-bindir |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; pp-debug.el --- Pretty-printing debugger -*- lexical-binding: t -*- | |
;; Copyright (C) 2018 Felipe Ochoa | |
;; Author: Felipe Ochoa | |
;; Created: 5 Dec 2017 | |
;; License: GPLv3 | |
;;; Commentary: | |
;;; Pretty-print debugger frames. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; Code: | |
;;;; Requirements | |
(require 'helm) | |
;;;; Commands | |
;;;###autoload | |
(defun helm-swish () |