[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 7c99d15 2/2: org-table.el: Allow to import files wi
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 7c99d15 2/2: org-table.el: Allow to import files with no .txt, .tsv or .csv |
Date: |
Sat, 1 May 2021 04:57:10 -0400 (EDT) |
branch: externals/org
commit 7c99d15557dd0bbc27bb14034960bd3a46ffc483
Author: Utkarsh Singh <utkarsh190601@gmail.com>
Commit: Bastien Guerry <bzg@gnu.org>
org-table.el: Allow to import files with no .txt, .tsv or .csv
* lisp/org-table.el (org-table-import): Allow to import files
with no .txt, .tsv or .csv extension.
TINYCHANGE
---
lisp/org-table.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/org-table.el b/lisp/org-table.el
index d4d7fba..5862b42 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -929,7 +929,8 @@ lines. It can have the following values:
- regexp When a regular expression, use it to match the separator."
(interactive "f\nP")
(when (and (called-interactively-p 'any)
- (not (string-match-p (rx "." (or "txt" "tsv" "csv") eos) file)))
+ (not (string-match-p (rx "." (or "txt" "tsv" "csv") eos) file))
+ (not (yes-or-no-p "The file's extension is not .txt, .tsv or
.csv. Import? ")))
(user-error "Cannot import such file"))
(unless (bolp) (insert "\n"))
(let ((beg (point))