1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00

(org-file-remote-p): Get regexp from list.

(org-archive-subtree): remove erraneous `]' from character list.
This commit is contained in:
Carsten Dominik 2006-09-29 07:27:57 +00:00
parent 86cc4a7109
commit 969ef2b7b6

View File

@ -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)))