ryuslash/emacs-config
1
0
Fork 0
Code Activity

[oni-org] Fix indentation

Browse source
This commit is contained in:
Tom Willemse 2024-07-01 15:07:54 -07:00
parent 15181c50d1
commit f9ff0da907
1 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
oni-org/oni-org.el
View file

@ -95,16 +95,16 @@
(unless (derived-mode-p 'org-mode) (unless (derived-mode-p 'org-mode)
(error "Not currently in an org-mode buffer")) (error "Not currently in an org-mode buffer"))
(save-excursion (save-excursion
(goto-char (point-min)) (goto-char (point-min))
(let ((header-end (or (search-forward "\n\n" nil t) (let ((header-end (or (search-forward "\n\n" nil t)
(point-max))) (point-max)))
(case-fold-search t)) (case-fold-search t))
(goto-char (point-min)) (goto-char (point-min))
(unless (search-forward "#+startup: inlineimages" header-end t) (unless (search-forward "#+startup: inlineimages" header-end t)
(goto-char (1- header-end)) (goto-char (1- header-end))
(insert "#+STARTUP: inlineimages\n"))))) (insert "#+STARTUP: inlineimages\n")))))
(defun oni-org-document-remove-inline-images-startup () (defun oni-org-document-remove-inline-images-startup ()
"Remove a line to the current org buffer that will make it load images inline." "Remove a line to the current org buffer that will make it load images inline."
(interactive) (interactive)
(unless (derived-mode-p 'org-mode) (unless (derived-mode-p 'org-mode)