This file contains 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 motionless-mark () | |
"Do commands until a command. | |
Remember point and then read a key to end a sequence of commands. | |
The sequence is read (until you enter the key that is being matched | |
as the end marker) and executed and then, when the end command is | |
matched, point is moved back to the remembered location and | |
the end command is executed. | |
This can be useful for things like slurp." |
This file contains 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
/* | |
simple little javascript to make org-mode presentations | |
export your org-mode to HTML with this at the end: | |
#+HTML: <script src="app.js"></script> | |
I also go to town and use a nice stylesheet. | |
Publish it with elnode with M-x elnode-make-js-server |
This file contains 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
;; read the gpg agent file and set the env vars | |
(let ((gpg-agent-file (expand-file-name "~/.gpg-agent-info"))) | |
(when (file-exists-p gpg-agent-file) | |
(message "import gpg agent file") | |
(mapc | |
(lambda (line) | |
(unless (equal line "") | |
(apply 'setenv (split-string line "=")))) | |
(split-string |
This file contains 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
<div id="tip"><span id="tipheart">♥</span><span id="tipword">gittip</span></div> |
This file contains 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
commit c91974d5afc8216e4cc87435eaff3bf950074092 (HEAD, refs/remotes/nictest/build-dist, refs/remotes/nicsoundcloud/build-dist, refs/heads/build-dist) | |
Author: Nic Ferrier <[email protected]> | |
Date: Wed Jul 31 17:12:35 2013 +0100 | |
add a dist target to the Makefile to build a tarball. | |
Modified .pkgignore | |
diff --git a/.pkgignore b/.pkgignore | |
index 139b42b..be41456 100644 | |
--- a/.pkgignore |
This file contains 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 tapas-creole->bootstrap (struct) | |
"Transform STRUCT, a creole structure, into something bootstrapable. | |
HTML DIV elements are hacked into the structure wherever we find | |
an HR element. The HR elements are retained." | |
(let ((tx | |
(loop for e in struct | |
append | |
(if (eq (car e) 'hr) | |
(list '(hr) '(plugin-html . "</div><div class=\"section\">")) |
This file contains 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
(defmacro with-transient-file (file-name &rest code) | |
"Load FILE-NAME into a buffer and eval CODE. | |
Then dispose of the buffer. | |
File loading errors may be generated as by any call to visit a | |
file." | |
(declare (indent 1) | |
(debug (sexp &rest form))) | |
(let ((fvn (make-symbol "fv")) |
This file contains 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
My friend has thought of a platform as a website which enables people wanting | |
to code on a project base. The creator of a project will outline it and start | |
work, where others may add lines of code for fun and for learning. We believe | |
it could bridge the gap between different competencies and also be a learning | |
arena. This is currently been started. will comence more on 21june. |
NewerOlder