Skip to content

Instantly share code, notes, and snippets.

@gusbrs
gusbrs / expand-region-org-element.el
Created February 22, 2020 21:38
Org tweaks with org-element for expand-region
(defun my/er/mark-org-sentence ()
"Marks one sentence."
(interactive)
(let* ((el (org-element-context))
(type (org-element-type el))
(par-el (org-element-property :parent el)))
;; FIXME: Consider if we should simply disable sentence marking in
;; certain element types, e.g. src-blocks.
(save-restriction
;; Do not mark sentences beyond the limits of paragraphs.
\documentclass{article}
\usepackage{biblatex}
\addbibresource{biblatex-examples.bib}
\begin{document}
\nocite{*}
\documentclass{article}
\begin{document}
Hello World!!
Resulting in error:
\begin{verbatim}
! I can't find file `T'.
<to be read again>
\documentclass{article}
\usepackage{libertine}
\begin{document}
Hello World!!!
The resulting .odt is corrupt.
\documentclass{article}
\usepackage[T1]{fontenc} % sets font encoding
\usepackage{lipsum}
\usepackage{url}
\usepackage{enumitem}
\newlist{floatnotes}{description}{1}
\setlist[floatnotes]{before=\footnotesize}
\usepackage[
\documentclass[12pt,DIV=8]{scrartcl}
\usepackage{soulutf8}
\usepackage{atbegshi}
\usepackage{etoolbox}
\usepackage{tikz}
\usetikzlibrary{tikzmark,calc,decorations.pathmorphing}
\colorlet{tdcolor}{yellow!35}
\documentclass[12pt,DIV=8]{scrartcl}
\usepackage{soulutf8}
\usepackage{atbegshi}
\usepackage{etoolbox}
\usepackage{tikz}
\usetikzlibrary{tikzmark,calc,decorations.pathmorphing}
\colorlet{tdcolor}{yellow!35}
\documentclass[12pt,DIV=8]{scrartcl}
\usepackage{soulutf8}
\usepackage{atbegshi}
\usepackage{etoolbox}
\usepackage{tikz}
\usetikzlibrary{tikzmark,calc,decorations.pathmorphing}
\colorlet{tdcolor}{yellow!35}
\documentclass[12pt,DIV=8]{scrartcl}
\usepackage{soulutf8}
\usepackage{atbegshi}
\usepackage{etoolbox}
\usepackage{tikz}
\usetikzlibrary{tikzmark,calc}
\makeatletter
\documentclass[12pt]{scrartcl}
\usepackage{soulutf8}
\usepackage{atbegshi}
\usepackage{etoolbox}
% \usepackage{calc}
\usepackage{tikz}
\usetikzlibrary{tikzmark,calc}
\makeatletter