From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Re: Attention XEmacs users Date: Wed, 21 Jun 2006 06:55:27 +0200 Message-ID: <5123c8f53ea6fb96e735824db1308930@science.uva.nl> References: <20060615132109.GA1296@ELSAMSW37164> <20060620120902.GB1132@ELSAMSW37164> <51f8d6c18c8a5c7541be9d341034dc50@science.uva.nl> <20060620150303.GD1132@ELSAMSW37164> <20060620162457.GE1132@ELSAMSW37164> <8ae4afbb9eb021c7b31fd84665f93daa@science.uva.nl> <20060620165356.GF1132@ELSAMSW37164> <0bee3a213a155b5970d3f68586cee893@science.uva.nl> <20060620172859.GG1132@ELSAMSW37164> <7c11547dc9caecd3e00b6804c40847f7@science.uva.nl> <87ac87mkit.fsf@tuxtanker.mwolson.org> Mime-Version: 1.0 (Apple Message framework v624) Content-Type: text/plain; charset=US-ASCII; format=flowed Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Fsukb-0006NF-CP for emacs-orgmode@gnu.org; Wed, 21 Jun 2006 00:55:37 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1FsukX-0006Lw-Ps for emacs-orgmode@gnu.org; Wed, 21 Jun 2006 00:55:37 -0400 Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1FsukX-0006Ls-LH for emacs-orgmode@gnu.org; Wed, 21 Jun 2006 00:55:33 -0400 In-Reply-To: <87ac87mkit.fsf@tuxtanker.mwolson.org> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Michael Olson Cc: emacs-orgmode@gnu.org This is excellent, thank you very much. - Carsten On Jun 21, 2006, at 2:15, Michael Olson wrote: > Carsten Dominik writes: > >> I just found file-remote-p, which may be the right solution. > > XEmacs and Emacs22 both have this function, but in case you need > backwards compatibility with Emacs21, feel free to use something like > the following. This handles both Tramp and ange-ftp file specifiers. > > (defun org-file-remote-p (file) > "Test whether FILE specifies a location on a remote system. > Return non-nil if the location is indeed remote. > > For example, the filename \"/user@host:/foo\" specifies a location > on the system \"/user@host:\"." > (cond ((fboundp 'file-remote-p) > (file-remote-p file)) > ((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)) > t) > (t nil))) > > -- > Michael Olson -- FSF Associate Member #652 -- http://www.mwolson.org/ > Interests: Emacs Lisp, text markup, protocols -- Jabber: > mwolson_at_hcoop.net > /` |\ | | | IRC: mwolson on freenode.net: #hcoop, #muse, #PurdueLUG > |_] | \| |_| Project involvement: Emacs, Muse, Planner, ERC, EMMS > _______________________________________________ > Emacs-orgmode mailing list > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode > -- Carsten Dominik Sterrenkundig Instituut "Anton Pannekoek" Universiteit van Amsterdam Kruislaan 403 NL-1098SJ Amsterdam phone: +31 20 525 7477