Skip to content

Instantly share code, notes, and snippets.

View incandescentman's full-sized avatar

Jay Dixit incandescentman

134 followers · 19 following
View GitHub Profile
@incandescentman
incandescentman / requests.org
Created July 15, 2015 19:00

[#C] create an auto-capitalization-predicate-exceptions-list?

I’d like to create a plain-text list of words that are exceptions to auto-capitalization. So for e.g. if I type e.g. like I have in this sentence, I don’t want the next word to be automatically capitalized.

See my existing code:

(setq auto-capitalize-predicate
      (lambda () (not (looking-back "\\([Ee]\\.g\\|[Uu]\\.S\\|[Ii]\\.e\\|\\.\\.\\)\\.[^.]*" (- (point) 20)))))
@incandescentman
incandescentman / buffer1.el
Created July 17, 2015 21:13
(executable-find "hunspell")
(setq-default ispell-program-name "hunspell")
(setq ispell-really-hunspell t)
(setq flyspell-default-dictionary "en_US")
(setq ispell-dictionary "en_US")
(setq ispell-program-name "/usr/local/bin/hunspell")
(setenv "DICTIONARY" "en_US")
@incandescentman
incandescentman / *Backtrace*.txt
Created August 8, 2015 02:55
Debugger entered--Lisp error: (wrong-type-argument listp #("Test" 0 4 (:parent (#1))))
org-element-set-contents(#("Test" 0 4 (:parent (#0))))
apply(org-element-set-contents #("Test" 0 4 (:parent (#0))) nil)
#[(s) "\306\307\310#\311\312 \211:\204\313\202\" @9\203! AA\202\" )\"\210\314\315\n \211:\2043\313\202@ @9\203? AA\202@ )#\210 \316\211\n ;\203V\317\320\f #\202\\\321 A@\f\"*\211;\203n\322 \313\f $\202z A\323 A@\f #\240\210 +\210\nA A@\240\210\n @\240*\207" [s new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\305 \211;\203\306\f\307 \n$\202 \fA\310\fA@ \n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 6](#("Test" 0 4 (:parent (#0))))
#[(--data) "\211:\204 ;\205\306\202 @9\205 @)?\206\337 \203,\307 \310\">\206\337\n\2047\311\f\"\202\337\n\312=\203\\\311\f\211:\204J\313\202W @9
@incandescentman
incandescentman / *Backtrace*.txt
Created August 8, 2015 02:55
Debugger entered--Lisp error: (wrong-type-argument listp #("Test" 0 4 (:parent (#1))))
org-element-set-contents(#("Test" 0 4 (:parent (#0))))
apply(org-element-set-contents #("Test" 0 4 (:parent (#0))) nil)
#[(s) "\306\307\310#\311\312 \211:\204\313\202\" @9\203! AA\202\" )\"\210\314\315\n \211:\2043\313\202@ @9\203? AA\202@ )#\210 \316\211\n ;\203V\317\320\f #\202\\\321 A@\f\"*\211;\203n\322 \313\f $\202z A\323 A@\f #\240\210 +\210\nA A@\240\210\n @\240*\207" [s new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\305 \211;\203\306\f\307 \n$\202 \fA\310\fA@ \n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 6](#("Test" 0 4 (:parent (#0))))
#[(--data) "\211:\204 ;\205\306\202 @9\205 @)?\206\337 \203,\307 \310\">\206\337\n\2047\311\f\"\202\337\n\312=\203\\\311\f\211:\204J\313\202W @9
@incandescentman
incandescentman / *Backtrace*.txt
Created August 8, 2015 03:06
Debugger entered--Lisp error: (wrong-type-argument listp #("Test document" 0 13 (:parent (#1))))
org-element-set-contents(#("Test document" 0 13 (:parent (#0))))
apply(org-element-set-contents #("Test document" 0 13 (:parent (#0))) nil)
#[(s) "\306\307\310#\311\312 \211:\204\313\202\" @9\203! AA\202\" )\"\210\314\315\n \211:\2043\313\202@ @9\203? AA\202@ )#\210 \316\211\n ;\203V\317\320\f #\202\\\321 A@\f\"*\211;\203n\322 \313\f $\202z A\323 A@\f #\240\210 +\210\nA A@\240\210\n @\240*\207" [s new old element property value replace-regexp-in-string "\n" " " mapc #[(blob) "\305 \211;\203\306\f\307 \n$\202 \fA\310\fA@ \n#\240\210\f+\207" [blob old value property element :parent org-add-props nil plist-put] 6] nil apply org-element-set-contents :parent get-text-property 0 plist-get org-add-props plist-put] 6](#("Test document" 0 13 (:parent (#0))))
#[(--data) "\211:\204 ;\205\306\202 @9\205 @)?\206\337 \203,\307 \310\">\206\337\n\2047\311\f\"\202\337\n\312
@incandescentman
incandescentman / *Backtrace*.txt
Created August 11, 2015 00:12
Debugger entered--Lisp error: (void-variable org-planning-line-re)
org-element--current-element(168330 element planning nil)
byte-code("\212\214~\210b\210 \205\306\307!\204\n\205\310\311\"\312 \f;\203+\313\314 \f#\2021\315\fA@ \"*1\311\2112\3113 \204f\3164\317 \21156\3205P7\321 ,\203\\\3223\311y\210\323\311w\210\324 \210\202H1U\203\225\325\3268\203\217\327 \f;\203\205\313\314 \f#\202\213\315\fA@ \"*\202\220 \"\210\202H\330\3164\317 \21156\3205P+1\316#\203\274\311y\210\323\311w\210\324 \210\3223\202H dU\203\310S\202\3119\331 \f;\203\335\313\314 \f#\202\343\315\fA@ \"*\206\3511b\210\3329\f;\203\375\313\314 \f#\202\315\fA@ \"*\211:X\205.:b\205.\3279\f;\203$\313\314 \f#\202*\315\fA@ \"*\2119)\204\3539\203Gm\203A9\202G9`2*\332\f\f;\203Y\313\314 \f#\202_\315\fA@ \"*\206z\212\3164\317 \21156\3205P7\333 \210,`)\f;:8\203\257`U\203\223\325\326;\"\210\202\257<\211<\205\246\334 \206\246\335<\336 \")\203\257\32
@incandescentman
incandescentman / *Backtrace*.txt
Created August 11, 2015 17:24
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
get-file-buffer(nil)
org-find-base-buffer-visiting(nil)
org-get-agenda-file-buffer(nil)
org-refile-get-targets(nil (#("tinyhabits" 0 10 (fontified t face org-level-1 line-prefix nil wrap-prefix #(" " 0 2 (face org-indent))))))
org-refile-get-location("Refile subtree \"tinyhabits\" to" nil confirm nil)
org-refile(nil)
#<subr call-interactively>(org-refile record nil)
ad-Advice-call-interactively(#<subr call-interactively> org-refile record nil)
apply(ad-Advice-call-interactively #<subr call-interactively> (org-refile record nil))
@incandescentman
incandescentman / *Backtrace*.txt
Created August 12, 2015 02:59
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
get-file-buffer(nil)
org-find-base-buffer-visiting(nil)
org-get-agenda-file-buffer(nil)
org-refile-get-targets(nil (#("ferry" 0 5 (fontified t line-prefix nil wrap-prefix #(" " 0 2 (face org-indent)) face org-level-1))))
org-refile-get-location("Refile subtree \"ferry\" to" nil confirm nil)
org-refile(nil)
#<subr call-interactively>(org-refile nil nil)
ad-Advice-call-interactively(#<subr call-interactively> org-refile)
apply(ad-Advice-call-interactively #<subr call-interactively> org-refile)
@incandescentman
incandescentman / *Backtrace*.txt
Created August 18, 2015 04:37
Debugger entered--Lisp error: (void-function my-org-after-todo)
my-org-after-todo()
run-hooks(org-after-todo-state-change-hook)
byte-code("\306\307!\210\310\307!\203\311 \210\307\312 !\203\313\225Sb\210\312\314\n\315Q!\204'\312\316!\210\303 \317 \303 \320\216\321\322\323\307\211$*@AABBCCD\313\232\203U\322D\324\202WEE\325\326!F\313\224G\327F!H\330HI\"\211JA@K\331J8L\332J8MF\206\207\333N\307OFP\235\211QARS\203\300D\334\232\203\252T\335=\204\273D\204\300T\203\300T\335=\204\300\336 \202D\337\232\203\336T\203\321S\204\336\340\341\342\343P\"\322\307$\202D\344=\203\373F\203\365R\205R@\202P@\202D\345=\203,QP\232?\205F\203\346PGRG\347#P8\202P#\350#!@)\202T\307=\203AD\351\232\203A\322\211D\206D\203\305D\333\232\203Q\322\202D\352=\203\\\322\202D\353=\203nL\206U@\202D\354=\203\205HV\235A@\206V@\202D\355=\203\243\356V!VHV\235A@\206\237V@)\202DP\235@\206D;\203\272\357\360
@incandescentman
incandescentman / *Backtrace*.txt
Created August 19, 2015 19:52
Debugger entered--Lisp error: (args-out-of-range 0 0)
get-text-property(0 face)
org-activate-plain-links(63)
font-lock-fontify-keywords-region(1 63 nil)
font-lock-default-fontify-region(1 63 nil)
font-lock-fontify-region(1 63 nil)
byte-code("\212\303 \304\216\305ed #\210\306 \210\307\211+\207" [save-match-data-internal verbose font-lock-fontified match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) font-lock-fontify-region font-lock-after-fontify-buffer t] 4)
font-lock-default-fontify-buffer()
font-lock-fontify-buffer()
org-bullets-mode()