From a926b391fc02a0adbd567268f0667f5f87d2f78d Mon Sep 17 00:00:00 2001 From: Matthew Date: Fri, 20 Dec 2019 02:21:42 -0500 Subject: [PATCH] Rename eaf-open-this-from-dired while backward-compatible --- eaf.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/eaf.el b/eaf.el index 3ad5177..0526c74 100644 --- a/eaf.el +++ b/eaf.el @@ -7,7 +7,7 @@ ;; Copyright (C) 2018, Andy Stewart, all rights reserved. ;; Created: 2018-06-15 14:10:12 ;; Version: 0.5 -;; Last-Updated: Wed Dec 18 23:16:29 2019 (-0500) +;; Last-Updated: Fri Dec 20 02:21:29 2019 (-0500) ;; By: Mingde (Matthew) Zeng ;; URL: http://www.emacswiki.org/emacs/download/eaf.el ;; Keywords: @@ -1023,7 +1023,8 @@ Make sure that your smartphone is connected to the same WiFi network as this com (interactive "DEAF File Receiver - Specify Destination: ") (eaf-open dir "file-receiver")) -(defun eaf-file-open-in-dired () +;;;###autoload +(defun eaf-open-this-from-dired () "Open html/pdf/image/video files whenever possible with EAF in dired. Other files will open normally with `dired-find-file' or `dired-find-alternate-file'" (interactive) @@ -1035,6 +1036,9 @@ Other files will open normally with `dired-find-file' or `dired-find-alternate-f (dired-find-alternate-file)) (t (dired-find-file))))) +;;;###autoload +(defalias 'eaf-file-open-in-dired #'eaf-open-this-from-dired) + ;;;;;;;;;;;;;;;;;;;; Utils ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun eaf-get-view-info () (let* ((window-allocation (eaf-get-window-allocation (selected-window)))