From e718f6cc8fcfaddc730423b7fe4acbd4b85101f8 Mon Sep 17 00:00:00 2001
From: Alex Kost <alezost@gmail.com>
Date: Mon, 10 Nov 2014 15:29:04 +0300
Subject: emacs: Add 'guix-find-file'.

* emacs/guix-utils.el (guix-find-file): New procedure.
* emacs/guix-info.el (guix-file): Use it.
---
 emacs/guix-info.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'emacs/guix-info.el')

diff --git a/emacs/guix-info.el b/emacs/guix-info.el
index edb44506ea..70ae39c970 100644
--- a/emacs/guix-info.el
+++ b/emacs/guix-info.el
@@ -334,7 +334,7 @@ VAL is a list, call the function on each element of this list."
   'face 'guix-info-file-path
   'help-echo "Find file"
   'action (lambda (btn)
-            (find-file (button-label btn))))
+            (guix-find-file (button-label btn))))
 
 (define-button-type 'guix-url
   :supertype 'guix
-- 
cgit v1.2.3