[bug#48650] [PATCH] gnu: Add emacs-org-pandoc-import.

[Xinglu Chen <public@yoctocell.xyz>]

* gnu/packages/emacs-xyz.scm (emacs-org-pandoc-import): New variable.
---
 gnu/packages/emacs-xyz.scm | 50 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index 886320cc34..4e914c5898 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -7115,6 +7115,56 @@ It also prettifies Org plain list bullets by:
 Features degrade gracefully when viewed from terminal.")
     (license license:gpl3+)))
 
+(define-public emacs-org-pandoc-import
+  (package
+    (name "emacs-org-pandoc-import")
+    (version "1.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/tecosaur/org-pandoc-import/")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "00z9bpm975mlyqlxbyib3j547br6kvcam04b70qkmq22vh8yf341"))))
+    (build-system emacs-build-system)
+    (arguments
+     `(#:include
+       (cons* "^filters\\/" "^preprocessors" %default-include)
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'patch-exec-paths
+           (lambda* (#:key inputs #:allow-other-keys)
+             (let ((pandoc (assoc-ref inputs "pandoc")))
+               (substitute* "org-pandoc-import.el"
+                 (("\"pandoc\"") (string-append "\"" pandoc "/bin/pandoc\"")))))))))
+    (inputs
+     `(("pandoc" ,pandoc)))
+    (home-page "https://github.com/tecosaur/org-pandoc-import/")
+    (synopsis "Save yourself from non-Org formats")
+    (description "This package uses Pandoc to convert selected file types to
+Org, so you never have to leave Org.  There are two tiers of non-Org file
+avoidance:
+
+@enumerate
+@item The basic ``get me out of here'' ---
+@code{org-pandoc-import-{to,as}-org} allows you to easily convert supported
+non-Org files to an Org file/buffer with Pandoc
+
+@item The ``I don’t even want to see non-org files'' ---
+@code{org-pandoc-import-transient-mode} is for you.  What it does:
+@itemize
+@item (via file handlers) intercepts requests for non-Org files it knows it
+can convert
+@item uses @code{org-pandoc-import-to-org} to convert the file to a temporary
+Org file
+@item opens this Org file instead
+@item exports back to the original non-Org file on save
+@end itemize
+@end enumerate")
+    (license license:gpl3+)))
+
 (define-public emacs-org-pomodoro
   ;; Last release version was from 2016.
   (let ((commit "aa07c11318f91219336197e62c47bc7a3d090479")

base-commit: a154048d980ada9b7dcc35e35cbe75056a0cd756
-- 
2.31.1