From b0647bb76b1be883c9c327bacaf6d72a5638784b Mon Sep 17 00:00:00 2001
From: rekado <rekado@elephly.net>
Date: Sat, 29 Oct 2016 13:39:03 +0200
Subject: libre: my/emacs: Build with HTTPS support.

---
 libre/custom/packages/variants.scm | 46 +++++++++++++++++++++++++++++---------
 1 file changed, 36 insertions(+), 10 deletions(-)

diff --git a/libre/custom/packages/variants.scm b/libre/custom/packages/variants.scm
index 2fc2e6f..3f1f5c5 100644
--- a/libre/custom/packages/variants.scm
+++ b/libre/custom/packages/variants.scm
@@ -26,6 +26,7 @@
   #:use-module (gnu packages)
   #:use-module (gnu packages autotools)
   #:use-module (gnu packages emacs)
+  #:use-module (gnu packages gnome)
   #:use-module (gnu packages gtk)
   #:use-module (gnu packages guile)
   #:use-module (gnu packages libusb)
@@ -64,13 +65,38 @@
          ("texinfo" ,texinfo))))))
 
 (define-public my/emacs
-  (package
-    (inherit emacs)
-    (arguments (append '(#:configure-flags '("--with-xwidgets=yes"
-                                             "--with-cairo=yes"))
-                       (package-arguments emacs)))
-    (inputs
-     `(("cairo" ,cairo)
-       ("webkitgtk+" ,webkitgtk)
-       ("libxcomposite" ,libxcomposite)
-       ,@(package-inputs emacs)))))
+  (let ((commit "5edf76ba15fb012e9cb3112ee4a2c9ef4b02f20e")
+        (revision "1"))
+    (package (inherit emacs)
+      (name "emacs")
+      (version (string-append "25.1-" revision "." (string-take commit 9)))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "git://git.sv.gnu.org/emacs.git")
+                      (commit commit)))
+                (file-name (string-append name "-" version "-checkout"))
+                (sha256
+                 (base32
+                  "04vw0q21kwbwrhycj0vbfrhxyb2nycnnqlch4nhl03v473fsxri4"))))
+      (arguments
+       (substitute-keyword-arguments
+           (append '(#:tests? #f  ; tests fail in this development version
+                     #:configure-flags '("--with-xwidgets=yes"))
+                   (package-arguments emacs))
+         ((#:phases phases)
+          `(modify-phases ,phases
+             (add-after 'unpack 'autogen
+               (lambda _
+                 (zero? (system* "autoreconf" "-vif"))))))))
+      (inputs
+       `(("libxcomposite" ,libxcomposite)
+         ("webkitgtk+" ,webkitgtk)
+         ;; These two are needed to get HTTPS support in Webkit.
+         ("glib-networking" ,glib-networking)
+         ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
+         ,@(package-inputs emacs)))
+      (native-inputs
+       `(("autoconf" ,autoconf)
+         ("automake" ,automake)
+         ,@(package-native-inputs emacs))))))
-- 
cgit v1.2.3