changeset 73164:4eef6a4c871f

(org-file-remote-p): Get regexp from list. (org-archive-subtree): remove erraneous `]' from character list.
author Carsten Dominik <dominik@science.uva.nl>
date Fri, 29 Sep 2006 07:27:57 +0000
parents 4498fb838f40
children deaec6fc4933
files lisp/textmodes/org.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/org.el	Fri Sep 29 07:27:27 2006 +0000
+++ b/lisp/textmodes/org.el	Fri Sep 29 07:27:57 2006 +0000
@@ -4569,7 +4569,7 @@
 		;; 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 @@
         ((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)))