Move function inside the apropiate block.
This commit is contained in:
parent
5aedee6f8e
commit
9399a3e372
@ -148,7 +148,12 @@
|
|||||||
(setq org-startup-with-inline-images t) ;; Mostrar por defecto las imágenes
|
(setq org-startup-with-inline-images t) ;; Mostrar por defecto las imágenes
|
||||||
(setq org-display-remote-inline-images 'cache) ;; Mostrar imágenes remotas
|
(setq org-display-remote-inline-images 'cache) ;; Mostrar imágenes remotas
|
||||||
(setq org-image-actual-width 512)
|
(setq org-image-actual-width 512)
|
||||||
|
)
|
||||||
|
|
||||||
|
;; Org-yt para soportar embebidos.
|
||||||
|
(use-package org-yt
|
||||||
|
:elpaca (:host github :repo "TobiasZawada/org-yt")
|
||||||
|
:config
|
||||||
(defun org-http-image-data-fn (protocol link _description)
|
(defun org-http-image-data-fn (protocol link _description)
|
||||||
"Interpret LINK as an URL to an image file."
|
"Interpret LINK as an URL to an image file."
|
||||||
(when (and (image-type-from-file-name link)
|
(when (and (image-type-from-file-name link)
|
||||||
@ -160,12 +165,6 @@
|
|||||||
(buffer-substring-no-properties (point) (point-max)))
|
(buffer-substring-no-properties (point) (point-max)))
|
||||||
(message "Download of image \"%s\" failed" link)
|
(message "Download of image \"%s\" failed" link)
|
||||||
nil)))
|
nil)))
|
||||||
)
|
|
||||||
|
|
||||||
;; Org-yt para soportar embebidos.
|
|
||||||
(use-package org-yt
|
|
||||||
:elpaca (:host github :repo "TobiasZawada/org-yt")
|
|
||||||
:config
|
|
||||||
(org-link-set-parameters "http" :image-data-fun #'org-http-image-data-fn)
|
(org-link-set-parameters "http" :image-data-fun #'org-http-image-data-fn)
|
||||||
(org-link-set-parameters "https" :image-data-fun #'org-http-image-data-fn)
|
(org-link-set-parameters "https" :image-data-fun #'org-http-image-data-fn)
|
||||||
)
|
)
|
||||||
|
Loading…
Reference in New Issue
Block a user