Browse Source

changed org-babel-load-languages to a on-demand function

master
Marc Pohling 6 years ago
parent
commit
9465cbc615
2 changed files with 27 additions and 4 deletions
  1. 15
      config.org
  2. 16
      user-global/abbrev_defs

15
config.org

@ -786,8 +786,19 @@ Org overwrites RET and C-j, so I need to disable the rebinds
#+END_SRC
** Org babel languages
This code block is linux specific. Loading languages which aren't available seems to be a problem
This code block is linux specific. Loading languages which aren't available seems to be a problem.
New: Load languages on demand. I need to test if this works as intended.
#+BEGIN_SRC emacs-lisp
(defadvice org-babel-execute-src-block (around load-language nil activate)
"Load language if needed"
(let ((language (org-element-property :language (org-element-at-point))))
(unless (cdr (assoc (intern language) org-babel-load-languages))
(add-to-list 'org-babel-load-languages (cons (intern language) t))
(org-babel-do-load-languages 'org-babel-load-languages org-babel-load-languages))
ad-do-it))
#+END_SRC
BEGIN_SRC emacs-lisp
(cond ((eq system-type 'gnu/linux)
(org-babel-do-load-languages
'org-babel-load-languages
@ -810,7 +821,7 @@ Org overwrites RET and C-j, so I need to disable the rebinds
)
))
)
#+END_SRC
END_SRC
#+BEGIN_SRC emacs-lisp
(defun my-org-confirm-babel-evaluate (lang body)

16
user-global/abbrev_defs

@ -59,8 +59,22 @@
(define-abbrev-table 'gnus-group-mode-abbrev-table '())
(define-abbrev-table 'grep-mode-abbrev-table '())
(define-abbrev-table 'helm-grep-mode-abbrev-table '())
(define-abbrev-table 'helm-major-mode-abbrev-table '())
(define-abbrev-table 'helm-moccur-mode-abbrev-table '())
(define-abbrev-table 'help-mode-abbrev-table '())
(define-abbrev-table 'ibuffer-mode-abbrev-table '())
(define-abbrev-table 'ivy-occur-grep-mode-abbrev-table '())
(define-abbrev-table 'ivy-occur-mode-abbrev-table '())
(define-abbrev-table 'lisp-mode-abbrev-table '())
(define-abbrev-table 'message-mode-abbrev-table '())
@ -87,8 +101,6 @@
(define-abbrev-table 'tabulated-list-mode-abbrev-table '())
(define-abbrev-table 'tar-mode-abbrev-table '())
(define-abbrev-table 'text-mode-abbrev-table '())
(define-abbrev-table 'url-cookie-mode-abbrev-table '())

Loading…
Cancel
Save