summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorClément Lassieur <clement@lassieur.org>2019-01-17 10:55:11 +0100
committerClément Lassieur <clement@lassieur.org>2019-01-17 11:37:42 +0100
commitcaa1a2d8229fc5517abb257c51ecc080246d9a82 (patch)
tree9fec0751c3a0701f91e3e35e26692050c5ac2f2c
parent2430781c3a97b8def6da5032f6a15b50cfc4d9a6 (diff)
downloadpackages-caa1a2d8229fc5517abb257c51ecc080246d9a82.tar.gz
emacs: fix dropbox autoloading
-rw-r--r--fix-autoloading.patch46
-rw-r--r--og/emacs.scm3
2 files changed, 48 insertions, 1 deletions
diff --git a/fix-autoloading.patch b/fix-autoloading.patch
new file mode 100644
index 0000000..1f54cd5
--- /dev/null
+++ b/fix-autoloading.patch
@@ -0,0 +1,46 @@
+From f4311f08f06a67bdc3f8f25ed3e74506c3cb1e99 Mon Sep 17 00:00:00 2001
+From: =?UTF-8?q?Cl=C3=A9ment=20Lassieur?= <clement@lassieur.org>
+Date: Thu, 17 Jan 2019 10:50:50 +0100
+Subject: [PATCH] fix autoloading
+
+---
+ dropbox-connect.el | 7 +++++++
+ dropbox.el | 8 +-------
+ 2 files changed, 8 insertions(+), 7 deletions(-)
+ create mode 100644 dropbox-connect.el
+
+diff --git a/dropbox-connect.el b/dropbox-connect.el
+new file mode 100644
+index 0000000..b7180f1
+--- /dev/null
++++ b/dropbox-connect.el
+@@ -0,0 +1,7 @@
++;;;###autoload
++(defun dropbox-connect ()
++ "Connect to Dropbox, hacking the \"/db:\" syntax into `find-file`."
++ (interactive)
++
++ (setf file-name-handler-alist
++ (cons '("\\`/db:" . dropbox-handler) file-name-handler-alist)))
+diff --git a/dropbox.el b/dropbox.el
+index 0441fe7..dc19e55 100644
+--- a/dropbox.el
++++ b/dropbox.el
+@@ -221,13 +221,7 @@ debugging but otherwise very intrusive."
+
+ ;;; Hooking into Dropbox
+
+-(defun dropbox-connect ()
+- "Connect to Dropbox, hacking the \"/db:\" syntax into `find-file`."
+- (interactive)
+-
+- (setf file-name-handler-alist
+- (cons '("\\`/db:" . dropbox-handler) file-name-handler-alist)))
+-
++;;;###autoload
+ (defun dropbox-handler (operation &rest args)
+ "Handles IO operations to Dropbox files"
+
+--
+2.20.1
+
diff --git a/og/emacs.scm b/og/emacs.scm
index d56080f..4715e00 100644
--- a/og/emacs.scm
+++ b/og/emacs.scm
@@ -32,7 +32,8 @@
"fix-encoding.patch"
"fix-expand-file-name.patch"
"fix-directory-file-name.patch"
- "fix-file-name-directory.patch"))))
+ "fix-file-name-directory.patch"
+ "fix-autoloading.patch"))))
(propagated-inputs
`(("emacs-request" ,emacs-request)))
(build-system emacs-build-system)