[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/transient a3b4422 3/6: transient-read-{, existing-}file
From: |
Stefan Monnier |
Subject: |
[elpa] externals/transient a3b4422 3/6: transient-read-{, existing-}file: New functions |
Date: |
Tue, 16 Mar 2021 09:42:40 -0400 (EDT) |
branch: externals/transient
commit a3b442243b0aaf3afe96abbd4047b2338a8c34cc
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
transient-read-{,existing-}file: New functions
---
lisp/transient.el | 8 ++++++++
1 file changed, 8 insertions(+)
diff --git a/lisp/transient.el b/lisp/transient.el
index 6ac494c..0c2d049 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2514,6 +2514,14 @@ stand-alone command."
;;;; Readers
+(defun transient-read-file (prompt _initial-input _history)
+ "Read a file."
+ (file-local-name (expand-file-name (read-file-name prompt))))
+
+(defun transient-read-existing-file (prompt _initial-input _history)
+ "Read an existing file."
+ (file-local-name (expand-file-name (read-file-name prompt nil nil t))))
+
(defun transient-read-directory (prompt _initial-input _history)
"Read a directory."
(file-local-name (expand-file-name (read-directory-name prompt))))
- [elpa] externals/transient updated (9ca983b -> cc16a5e), Stefan Monnier, 2021/03/16
- [elpa] externals/transient baebe85 1/6: manual: Deal with texinfo cross reference idiocy, Stefan Monnier, 2021/03/16
- [elpa] externals/transient a3b4422 3/6: transient-read-{, existing-}file: New functions,
Stefan Monnier <=
- [elpa] externals/transient 1e090b0 2/6: Fixup changelog, Stefan Monnier, 2021/03/16
- [elpa] externals/transient 8c28b8a 4/6: transient-prefix: Do not initially bind SUFFIX-DESCRIPTION, Stefan Monnier, 2021/03/16
- [elpa] externals/transient cc16a5e 6/6: transient-{, base-}map: Mention related keymaps in doc-string, Stefan Monnier, 2021/03/16
- [elpa] externals/transient eff65f1 5/6: Revert "manual: Deal with texinfo cross reference idiocy", Stefan Monnier, 2021/03/16