将链接从 image-dired 复制到 org-mode

Copy links from image-dired to org-mode

我正在处理充满图像的目录,这些图像是档案中文档的照片。我正在编写 org 文件,其中包含关于这些内容的注释,我想让它更快更容易地浏览图像(例如使用 image-dired)并复制 links 与我的笔记一起进入 org-mode 文件。

我的工作设置如下所示:

我的问题是:

这里有一些代码可以更轻松地处理图像。只需将其复制到您的 *scratch* 缓冲区和 运行 M-x eval-buffer.

(defun my-next-image ()
  (interactive)
  (save-excursion 
    (with-current-buffer "*image-dired*"
      (image-dired-forward-image)
      (image-dired-display-thumbnail-original-image))))

(defun my-prev-image ()
  (interactive)
  (save-excursion 
    (with-current-buffer "*image-dired*"
      (image-dired-backward-image)
      (image-dired-display-thumbnail-original-image))))

(defun my-insert-current-image-path ()
  (interactive)
  (insert
   (concat
    "[["
    (save-excursion
      (with-current-buffer "*image-dired*"
        (image-dired-original-file-name)))
    "]]")))


(define-key org-mode-map (kbd "<f9> n") 'my-next-image)
(define-key org-mode-map (kbd "<f9> p") 'my-prev-image)
(define-key org-mode-map (kbd "<f9> i") 'my-insert-current-image-path)

在org模式下按F9 n切换到下一张图片,按F9 i插入link到当前图片。根据您的喜好重新绑定密钥。