emacsPackagesNg: add all of MELPA

pkgs/applications/editors/emacs-modes/elpa-packages.nix

@@ -10,8 +10,12 @@ let
   mkPackage = self: name: recipe:
     let drv =
           { elpaBuild, stdenv, fetchurl }:
-          let fetch = { inherit fetchurl; }."${recipe.fetch.tag}"
+          let
-                or (abort "emacs-${name}: unknown fetcher '${recipe.fetch.tag}'");
+            unknownFetcher =
+              abort "emacs-${name}: unknown fetcher '${recipe.fetch.tag}'";
+            fetch =
+              { inherit fetchurl; }."${recipe.fetch.tag}"
+              or unknownFetcher;
             args = builtins.removeAttrs recipe.fetch [ "tag" ];
             src = fetch args;
           in elpaBuild {
@@ -19,8 +23,7 @@ let
             inherit (recipe) version;
             inherit src;
             deps =
-              let lookupDep = d:
+              let lookupDep = d: self."${d}" or null;
-                    self."${d}" or (abort "emacs-${name}: missing dependency ${d}");
               in map lookupDep recipe.deps;
             meta = {
               homepage = "http://elpa.gnu.org/packages/${name}.html";
@@ -29,14 +32,23 @@ let
           };
     in self.callPackage drv {};
 
-  packages = self:
+in
+
+self:
+
   let
-      elpaPackages = mapAttrs (mkPackage self) manifest;
+    super = mapAttrs (mkPackage self) manifest;
 
     elpaBuild = import ../../../build-support/emacs/melpa.nix {
       inherit (pkgs) lib stdenv fetchurl texinfo;
       inherit (self) emacs;
     };
-    in elpaPackages // { inherit elpaBuild elpaPackages; };
 
-in makeScope pkgs.newScope packages
+    builtin = null;
+
+    markBroken = pkg: pkg.override {
+      elpaBuild = args: self.elpaBuild (args // {
+        meta = (args.meta or {}) // { broken = true; };
+      });
+    };
+  in super // { inherit elpaBuild; elpaPackage = super; }

pkgs/applications/editors/emacs-modes/melpa-packages.nix

@@ -9,9 +9,15 @@ let
 
   mkPackage = self: name: recipe:
     let drv =
-          { melpaBuild, stdenv, fetchurl }:
+          { melpaBuild, stdenv, fetchurl, fetchcvs, fetchgit, fetchhg }:
-          let fetch = { inherit fetchurl; }."${recipe.fetch.tag}"
+          let
-                or (abort "emacs-${name}: unknown fetcher '${recipe.fetch.tag}'");
+            unknownFetcher =
+              abort "emacs-${name}: unknown fetcher '${recipe.fetch.tag}'";
+            fetch =
+              {
+                inherit fetchurl fetchcvs fetchgit fetchhg;
+              }."${recipe.fetch.tag}"
+              or unknownFetcher;
             args = builtins.removeAttrs recipe.fetch [ "tag" ];
             src = fetch args;
           in melpaBuild {
@@ -19,8 +25,7 @@ let
             inherit (recipe) version;
             inherit src;
             deps =
-              let lookupDep = d:
+              let lookupDep = d: self."${d}" or null;
-                    self."${d}" or (abort "emacs-${name}: missing dependency ${d}");
               in map lookupDep recipe.deps;
             meta = {
               homepage = "http://melpa.org/#/${name}";
@@ -29,14 +34,17 @@ let
           };
     in self.callPackage drv {};
 
-  packages = self:
+in
+
+self:
+
   let
-      melpaPackages = mapAttrs (mkPackage self) manifest;
+    super = mapAttrs (mkPackage self) manifest;
 
-      melpaBuild = import ../../../build-support/emacs/melpa.nix {
+    markBroken = pkg: pkg.override {
-        inherit (pkgs) lib stdenv fetchurl texinfo;
+      melpaBuild = args: self.melpaBuild (args // {
-        inherit (self) emacs;
+        meta = (args.meta or {}) // { broken = true; };
+      });
     };
-    in melpaPackages // { inherit melpaBuild melpaPackages; };
+  in
-
+    super // { melpaPackages = super; }
-in makeScope pkgs.newScope packages

pkgs/applications/editors/emacs-modes/melpa-stable-packages.nix

@@ -9,9 +9,15 @@ let
 
   mkPackage = self: name: recipe:
     let drv =
-          { melpaBuild, stdenv, fetchurl }:
+          { melpaBuild, stdenv, fetchurl, fetchcvs, fetchgit, fetchhg }:
-          let fetch = { inherit fetchurl; }."${recipe.fetch.tag}"
+          let
-                or (abort "emacs-${name}: unknown fetcher '${recipe.fetch.tag}'");
+            unknownFetcher =
+              abort "emacs-${name}: unknown fetcher '${recipe.fetch.tag}'";
+            fetch =
+              {
+                inherit fetchurl fetchcvs fetchgit fetchhg;
+              }."${recipe.fetch.tag}"
+              or unknownFetcher;
             args = builtins.removeAttrs recipe.fetch [ "tag" ];
             src = fetch args;
           in melpaBuild {
@@ -19,8 +25,7 @@ let
             inherit (recipe) version;
             inherit src;
             deps =
-              let lookupDep = d:
+              let lookupDep = d: self."${d}" or null;
-                    self."${d}" or (abort "emacs-${name}: missing dependency ${d}");
               in map lookupDep recipe.deps;
             meta = {
               homepage = "http://stable.melpa.org/#/${name}";
@@ -29,14 +34,17 @@ let
           };
     in self.callPackage drv {};
 
-  packages = self:
+in
+
+self:
+
   let
-      melpaStablePackages = mapAttrs (mkPackage self) manifest;
+    super = mapAttrs (mkPackage self) manifest;
 
-      melpaBuild = import ../../../build-support/emacs/melpa.nix {
+    markBroken = pkg: pkg.override {
-        inherit (pkgs) lib stdenv fetchurl texinfo;
+      melpaBuild = args: self.melpaBuild (args // {
-        inherit (self) emacs;
+        meta = (args.meta or {}) // { broken = true; };
+      });
     };
-    in melpaStablePackages // { inherit melpaBuild melpaStablePackages; };
+  in
-
+    super // { melpaStablePackages = super; }
-in makeScope pkgs.newScope packages

pkgs/top-level/all-packages.nix

@@ -11627,7 +11627,8 @@ let
   emacsPackagesNgGen = emacs: callPackage ./emacs-packages.nix {
     overrides = (config.emacsPackageOverrides or (p: {})) pkgs;
 
-    inherit emacs elpaPackages;
+    inherit newScope;
+    inherit emacs elpaPackages melpaPackages melpaStablePackages;
 
     trivialBuild = callPackage ../build-support/emacs/trivial.nix {
       inherit emacs;
@@ -11647,8 +11648,13 @@ let
   emacs24PackagesNg = recurseIntoAttrs (emacsPackagesNgGen emacs24);
 
   elpaPackages =
-    let imported = import ../applications/editors/emacs-modes/elpa-packages.nix pkgs;
+    import ../applications/editors/emacs-modes/elpa-packages.nix pkgs;
-    in recurseIntoAttrs (imported.override (super: self: { inherit emacs; }));
+
+  melpaStablePackages =
+    import ../applications/editors/emacs-modes/melpa-stable-packages.nix pkgs;
+
+  melpaPackages =
+    import ../applications/editors/emacs-modes/melpa-packages.nix pkgs;
 
   emacsWithPackages = callPackage ../build-support/emacs/wrapper.nix { };
   emacs24WithPackages = emacsWithPackages.override { emacs = emacs24; };

pkgs/top-level/emacs-packages.nix

@@ -33,9 +33,9 @@
 
 { overrides
 
-, lib, stdenv, fetchurl, fetchgit, fetchFromGitHub, fetchhg
+, lib, newScope, stdenv, fetchurl, fetchgit, fetchFromGitHub, fetchhg
 
-, emacs, elpaPackages
+, emacs, elpaPackages, melpaPackages, melpaStablePackages
 , trivialBuild
 , melpaBuild
 
@@ -44,7 +44,14 @@
 
 with lib.licenses;
 
-let packagesFun = super: self: with self; {
+let
+
+  addMelpaPackages = scope: scope.override (super: melpaPackages);
+  addMelpaStablePackages = scope: scope.override (super: melpaStablePackages);
+  addElpaPackages = scope: scope.override (super: elpaPackages);
+  addOverrides = scope: scope.override packagesFun;
+
+  packagesFun = super: self: with self; {
 
   inherit emacs melpaBuild trivialBuild;
 
@@ -2021,4 +2028,9 @@ let packagesFun = super: self: with self; {
 
   };
 
-in elpaPackages.override packagesFun
+in
+  addOverrides
+  (addElpaPackages
+  (addMelpaStablePackages
+  (addMelpaPackages
+  (lib.makeScope newScope (self: { inherit emacs; })))))