From 969ef2b7b64a2eabb524b0327e6163c7703f3641 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Fri, 29 Sep 2006 07:27:57 +0000 Subject: [PATCH] (org-file-remote-p): Get regexp from list. (org-archive-subtree): remove erraneous `]' from character list. --- lisp/textmodes/org.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/org.el b/lisp/textmodes/org.el index 30ee123388c..c8ecc3df63d 100644 --- a/lisp/textmodes/org.el +++ b/lisp/textmodes/org.el @@ -4569,7 +4569,7 @@ this heading. " ;; Make the subtree visible (show-subtree) (org-end-of-subtree t) - (skip-chars-backward " \t\r\n]") + (skip-chars-backward " \t\r\n") (and (looking-at "[ \t\r\n]*") (replace-match "\n\n"))) ;; No specific heading, just go to end of file. @@ -9816,7 +9816,7 @@ on the system \"/user@host:\"." ((fboundp 'tramp-handle-file-remote-p) (tramp-handle-file-remote-p file)) ((and (boundp 'ange-ftp-name-format) - (string-match ange-ftp-name-format file)) + (string-match (car ange-ftp-name-format) file)) t) (t nil))) -- 2.39.2