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
# /Users/HOME/.0.data/.0.emacs/.0.macports/bin/aspell --lang=en dump config | |
# conf (string) | |
# main configuration file | |
# default: aspell.conf | |
# conf-dir (string) | |
# location of main configuration file | |
# default: <prefix:etc> = /Users/HOME/.0.data/.0.emacs/.0.macports/etc |
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
OSX -- ASPELL -- DICTIONARY -- Spanish | |
* unpack aspell6-es-1.11-2.tar.bz2 | |
* cd over to the root directory of the unpacked source | |
./configure --vars PATH=$PATH:/Users/HOME/.0.data/.0.emacs/.0.macports/bin | |
make |
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 my-basic-org-todo () | |
"Doc-string ...." | |
(interactive) | |
(let* ((choice (read-char-exclusive "[t] TODO | [n] NEXT | [w] WAITING")) | |
(chosen-string (cond | |
((eq choice ?t) | |
"TODO") | |
((eq choice ?n) | |
"NEXT") | |
((eq choice ?w) |
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
(require 'cl) | |
;; (global-set-key [f1] 'is-it-defined) | |
(defun is-it-defined () | |
(interactive) | |
(save-excursion | |
(goto-char (point-min)) | |
(let ((output-buffer (get-buffer-create "*IS-IT-DEFINED*")) | |
(cleanup (lambda () | |
(recenter 1) |
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: The process output from the gls command tends to be truncated when both | |
;;; (1) _not_ using a process filter and (2) _not_ using a pipe. When _not_ using a | |
;;; process filter, the workaround is to use a pipe by either setting the variable | |
;;; `process-connection-type' to `nil`; or, using the `make-process' keyword/argument | |
;;; pair of :connection-type 'pipe. Said workaround, however, has the disadvantage | |
;;; of having all the output arriving in one fell swoop and window-start of the | |
;;; process output buffer is point-max of the output -- meaning that the output is | |
;;; not visible unless using a command such as recenter on the output window buffer. | |
(defun gls-example (&optional dir) | |
"Demonstration creating a running process with a let-bound process-environment." |
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
(defvar my-isearch-window-start '(nil 0) | |
"Record the `selected-window' and the Y-axis coordinate of point each time that | |
`isearch-update' calls `my-isearch-update-recenter' (via an advice). The value | |
of this variable will be a cons cell with the CAR being the `selected-window' and | |
the CDR being the Y-axis coordinate of point.") | |
(defun my-isearch-update-recenter () | |
(let* ((win (selected-window)) | |
(pt (point)) | |
(y (cdr (nth 2 (posn-at-point pt win)))) |
OlderNewer