incandescentman

Meric could be a prickly friend—curt, dismissive, and oblivious towards social niceties. He was as unlikely to ask after one’s wellbeing or the state of one’s relations as the guy serving you a court summons. He didn’t expect to hear from you regularly, nor was he prone to just checking in. A few years ago, he'd gotten hit crossing the street by one of those evangelical bicyclists, and wound up with two fractured ribs and a collapsed lung. He'd dissuaded his friends from visiting him in the hospital, claiming he preferred to recuperate on his own. But as infuriating as his grumpiness could be, there was something calming about him like a sand dune. He was no flatterer—his sympathies had tangible value. He‘d been known to joke that he was a termite in the social network.

incandescentman

Meric could be a prickly friend—curt, dismissive, and oblivious towards social niceties. He was as unlikely to ask after one’s wellbeing or the state of one’s relations as the guy serving you a court summons. He didn’t expect to hear from you regularly, nor was he prone to just checking in. A few years ago, he'd gotten hit crossing the street by one of those evangelical bicyclists and wound up with a mandibular dislocation and two broken ribs. He dissuaded his friends from visiting him in the hospital, claiming he preferred to recuperate on his own. As infuriating as his grumpiness could be, there was something calming about him like a sand dune. He was no flatterer—his sympathies had tangible value. He‘d been known to joke that he was a termite in the social network.

incandescentman

[#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

(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

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\\\321A@\f\"*\211;\203n\322\313\f
$\202zA\323A@\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

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\\\321A@\f\"*\211;\203n\322\313\f
$\202zA\323A@\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

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\\\321A@\f\"*\211;\203n\322\313\f
$\202zA\323A@\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

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\202H
1U\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\203G
m\203A
9\202G
9`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

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

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)