Clean up "lst:setup-org-src" and hide the "Deprecated ..." section
This commit is contained in:
parent
30f444a4a1
commit
5dafaa31e2
35
README.org
35
README.org
@ -2285,19 +2285,19 @@ region becomes the block BODY. Otherwise, insert an empty block."
|
||||
#+caption: Setup =org-src=.
|
||||
#+name: lst:setup-org-src
|
||||
#+begin_src emacs-lisp -n :results silent
|
||||
(with-eval-after-load 'emacs
|
||||
(with-eval-after-load 'org-src
|
||||
;; https://list.orgmode.org/c3cc4ff1fcfb3bc741df89a3f45be30e@posteo.net/
|
||||
(setopt org-src-preserve-indentation nil
|
||||
org-edit-src-content-indentation 0)
|
||||
(with-eval-after-load 'org-src
|
||||
;; https://list.orgmode.org/c3cc4ff1fcfb3bc741df89a3f45be30e@posteo.net/
|
||||
(setopt org-edit-src-content-indentation 0
|
||||
org-src-preserve-indentation nil
|
||||
org-src-window-setup 'current-window)
|
||||
|
||||
(defun org-left-shift-block ()
|
||||
"Left-shift the block at point using `org-indent-block'."
|
||||
(interactive)
|
||||
(let ((org-adapt-indentation nil)
|
||||
(org-edit-src-content-indentation 0)
|
||||
(org-src-preserve-indentation nil))
|
||||
(org-indent-block))))
|
||||
(defun org-left-shift-block ()
|
||||
"Left-shift the block at point using `org-indent-block'."
|
||||
(interactive)
|
||||
(let ((org-adapt-indentation nil)
|
||||
(org-edit-src-content-indentation 0)
|
||||
(org-src-preserve-indentation nil))
|
||||
(org-indent-block)))
|
||||
|
||||
(defun org-right-shift-block (&optional arg)
|
||||
"Right-shift the block at point 4 spaces.
|
||||
@ -2314,9 +2314,6 @@ With prefix argument ARG, prompt for the number of spaces."
|
||||
(string-insert-rectangle
|
||||
(match-beginning 5) (point) (make-string spaces ?\s)))))
|
||||
|
||||
(declare-function org-babel-map-src-blocks "ext:ob-core" (file &rest body))
|
||||
(declare-function org-do-remove-indentation "ext:org-macs" (n skip-fl))
|
||||
|
||||
(defun zero-all-org-src-blocks-indentation ()
|
||||
"Remove the indentation of all `org-src-mode' blocks without `-i' switch."
|
||||
(interactive)
|
||||
@ -3525,7 +3522,7 @@ handled by [[info:org#Noweb Reference Syntax][noweb (info)]].
|
||||
<<latex-header-5>>
|
||||
#+end_src
|
||||
|
||||
*** [[info:org#LaTeX header and sectioning][Deprecated LaTeX preamble editing methods]]
|
||||
*** [[info:org#LaTeX header and sectioning][Deprecated LaTeX preamble editing methods]] :noexport:
|
||||
:PROPERTIES:
|
||||
:CUSTOM_ID: sec:easy-latex-preamble-editing
|
||||
:END:
|
||||
@ -3563,7 +3560,7 @@ in [[info:org#Export Settings][#+INCLUDE: <FILE>]] files.
|
||||
#+caption: LaTeX preamble =latex_header= and =latex_extra_header= export options
|
||||
#+caption: easily.
|
||||
#+name: lst:org-babel-latex-header-blocks
|
||||
#+begin_src emacs-lisp -n :exports code :results silent
|
||||
#+begin_src emacs-lisp -n :exports code :results silent :tangle no
|
||||
(with-eval-after-load 'emacs
|
||||
(defun prefix-all-lines (prefix body)
|
||||
(with-temp-buffer
|
||||
@ -3590,8 +3587,6 @@ prefixes all lines with \"#+latex_header: \"."
|
||||
'((:exports . "results") (:results . "raw")))
|
||||
|
||||
(with-eval-after-load 'org-src
|
||||
(setopt org-src-window-setup 'current-window)
|
||||
|
||||
(add-to-list 'org-src-lang-modes '("latex-header" . latex))
|
||||
(add-to-list 'org-src-lang-modes '("latex-extra-header" . latex))))
|
||||
#+end_src
|
||||
@ -3599,7 +3594,7 @@ prefixes all lines with \"#+latex_header: \"."
|
||||
#+caption[Convert marked LaTeX export blocks to LaTeX header lines]:
|
||||
#+caption: Convert marked LaTeX export blocks to LaTeX header lines.
|
||||
#+name: lst:org-latex-header-blocks-filter
|
||||
#+begin_src emacs-lisp -n :results silent
|
||||
#+begin_src emacs-lisp -n :results silent :tangle no
|
||||
(with-eval-after-load 'ox
|
||||
(defun org-latex-header-blocks-filter (backend)
|
||||
"Convert marked LaTeX export blocks to \"#+latex_header: \" lines.
|
||||
|
Loading…
Reference in New Issue
Block a user