Mac: Services, Emacs, Open Selected File

Mac: Services, Emacs, Open Selected File

[Ronald W. Heiby]

On Mac OS X 10.4.11, MacBook Pro. In the Finder, I select a file.
Then, I use the menus to choose Services, Emacs, Open Selected File.

I expect an Emacs window to pop up with the file contents in a buffer,
ready for editing. Instead, I get the following in the minibuffer:

find-file-existing: file://localhost/Users/heiby/dhrepl-loc.txt does not 
exist

when trying to open "dhrepl-loc.txt" in my home directory.

Thanks! Ron.

In GNU Emacs 22.1.1 (i386-apple-darwin8.11.1, Carbon Version 1.6.0)
  of 2008-02-28 on unknown-10-74-95-133.yahoo.com
Windowing system distributor `Apple Inc.', version 10.4.11
Important settings:
   value of $LC_ALL: nil
   value of $LC_COLLATE: nil
   value of $LC_CTYPE: nil
   value of $LC_MESSAGES: nil
   value of $LC_MONETARY: nil
   value of $LC_NUMERIC: nil
   value of $LC_TIME: nil
   value of $LANG: nil
   locale-coding-system: iso-8859-1
   default-enable-multibyte-characters: t

Major mode: Lisp Interaction

Minor modes in effect:
   encoded-kbd-mode: t
   tooltip-mode: t
   tool-bar-mode: t
   mouse-wheel-mode: t
   menu-bar-mode: t
   file-name-shadow-mode: t
   global-font-lock-mode: t
   font-lock-mode: t
   blink-cursor-mode: t
   unify-8859-on-encoding-mode: t
   utf-translate-cjk-mode: t
   auto-compression-mode: t
   line-number-mode: t

Recent input:
C-x k <return> <escape> x s e n d - e m a <tab> a c
<backspace> <backspace> c s - b u g <tab> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> e m a c s - s e
n <tab> <backspace> <backspace> <backspace> <backspace>
<backspace> <backspace> <backspace> <backspace> <backspace>
r e p <tab> o <tab> r t <tab> <return>

Recent messages:
("/Users/heiby/Software/emacs-22.1/mac/Emacs.app/Contents/MacOS/Emacs")
Quit
Loading encoded-kb...done
Making completion list...
Loading help-mode...done
Making completion list...
Loading emacsbug...
Loading regexp-opt...done
Loading emacsbug...done

Re: Mac: Services, Emacs, Open Selected File

[Stefan Monnier]

> On Mac OS X 10.4.11, MacBook Pro. In the Finder, I select a file.
> Then, I use the menus to choose Services, Emacs, Open Selected File.

> I expect an Emacs window to pop up with the file contents in a buffer,
> ready for editing. Instead, I get the following in the minibuffer:

> find-file-existing: file://localhost/Users/heiby/dhrepl-loc.txt does not
> exist

Hmm... Enabling url-handler-mode in your .emacs should fix it.


        Stefan

Re: Mac: Services, Emacs, Open Selected File

[YAMAMOTO Mitsuharu]

>>>>> On Fri, 14 Mar 2008 12:47:56 +0530, "Ronald W. Heiby" <heiby@yahoo-inc.com> said:

> On Mac OS X 10.4.11, MacBook Pro. In the Finder, I select a file.
> Then, I use the menus to choose Services, Emacs, Open Selected File.

> I expect an Emacs window to pop up with the file contents in a
> buffer, ready for editing. Instead, I get the following in the
> minibuffer:

> find-file-existing: file://localhost/Users/heiby/dhrepl-loc.txt does
> not exist

> when trying to open "dhrepl-loc.txt" in my home directory.

Thanks for this reporting.  This seems to be due to a subtle
difference in various versions of Mac OS X.  It fails only on 10.4.11,
but not on 10.2.8, 10.3.9, or 10.5.2.  Please try the following patch.

				     YAMAMOTO Mitsuharu
				mituharu@math.s.chiba-u.ac.jp

Index: lisp/term/mac-win.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/term/mac-win.el,v
retrieving revision 1.88.2.6
diff -c -p -r1.88.2.6 mac-win.el
*** lisp/term/mac-win.el	7 Jan 2008 02:18:53 -0000	1.88.2.6
--- lisp/term/mac-win.el	14 Mar 2008 23:51:56 -0000
*************** either in the current buffer or in the e
*** 2117,2123 ****
  (defun mac-service-open-file ()
    "Open the file specified by the selection value for Services."
    (interactive)
!   (find-file-existing (x-selection-value mac-service-selection)))
  
  (defun mac-service-open-selection ()
    "Create a new buffer containing the selection value for Services."
--- 2117,2125 ----
  (defun mac-service-open-file ()
    "Open the file specified by the selection value for Services."
    (interactive)
!   ;; The selection seems not to contain the file name as
!   ;; public.utf16-plain-text data on Mac OS X 10.4.
!   (dnd-open-file (x-get-selection mac-service-selection 'public.file-url) nil))
  
  (defun mac-service-open-selection ()
    "Create a new buffer containing the selection value for Services."