Emacs module seems to work now... good enough for merge into master.
This commit is contained in:
parent
986ca7f5cd
commit
886a3b0dc8
|
|
@ -8,7 +8,8 @@ mkIf (elem "fonts" config.machine.conffiles) {
|
|||
enableGhostscriptFonts = true;
|
||||
fontconfig = {
|
||||
enable = true;
|
||||
ultimate.enable = true;
|
||||
# deprecated (will eventually be completely removed)
|
||||
# ultimate.enable = true;
|
||||
includeUserConf = false;
|
||||
};
|
||||
fonts = with pkgs; [
|
||||
|
|
|
|||
|
|
@ -21,7 +21,18 @@ with lib;
|
|||
"base"
|
||||
"dict"
|
||||
"emacs"
|
||||
"emacs::solarized-theme"
|
||||
"emacs::doom-themes"
|
||||
"emacs::doom-modeline"
|
||||
# "emacs::solarized-theme"
|
||||
"emacs::company"
|
||||
"emacs::flyspell"
|
||||
"emacs::flycheck"
|
||||
# "emacs::powerline"
|
||||
"emacs::nix-mode"
|
||||
"emacs::magit"
|
||||
"emacs::org"
|
||||
"emacs::elpy"
|
||||
# "emacs::rust"
|
||||
"extra"
|
||||
"cpp"
|
||||
"haskell"
|
||||
|
|
@ -38,6 +49,8 @@ with lib;
|
|||
firewall = {
|
||||
enable = true;
|
||||
allowPing = true;
|
||||
allowedUDPPorts = [ 24642 ];
|
||||
allowedTCPPorts = [ 24642 ];
|
||||
allowedUDPPortRanges = [ { from = 1714; to = 1764; } ];
|
||||
allowedTCPPortRanges = [ { from = 1714; to = 1764; } ];
|
||||
};
|
||||
|
|
|
|||
|
|
@ -389,22 +389,23 @@ in
|
|||
};
|
||||
|
||||
config = mkIf cfg.enable {
|
||||
environment.systemPackages = let
|
||||
finalPackage = (pkgs.emacsWithPackages (epkgs:
|
||||
let
|
||||
getPkg = v:
|
||||
if isFunction v then [ (v epkgs) ]
|
||||
else optional (isString v && hasAttr v epkgs) epkgs.${v};
|
||||
in
|
||||
[ epkgs.use-package ]
|
||||
++ optional hasBind epkgs.bind-key
|
||||
++ optional hasBind epkgs.diminish
|
||||
++ (
|
||||
concatMap (v: getPkg (v.package))
|
||||
(builtins.attrValues cfg.usePackage)
|
||||
)));
|
||||
in [
|
||||
((pkgs.emacsPackagesNgGen finalPackage).trivialBuild {
|
||||
machine.pkgsets.emacs.pkgs = epkgs:
|
||||
let
|
||||
getPkg = v:
|
||||
if isFunction v then [ (v epkgs) ]
|
||||
else optional (isString v && hasAttr v epkgs) epkgs.${v};
|
||||
in
|
||||
[ epkgs.use-package ]
|
||||
++ optional hasBind epkgs.bind-key
|
||||
++ optional hasBind epkgs.diminish
|
||||
++ (
|
||||
concatMap (v: getPkg (v.package))
|
||||
(builtins.attrValues cfg.usePackage)
|
||||
);
|
||||
machine.pkgsets.emacs.pkgwrap = (pkgs.emacsWithPackages config.machine.pkgsets.emacs.pkgs);
|
||||
|
||||
environment.systemPackages = [
|
||||
((pkgs.emacsPackagesNgGen config.machine.pkgsets.emacs.pkgwrap).trivialBuild {
|
||||
pname = "hm-init";
|
||||
version = "0";
|
||||
src = pkgs.writeText "hm-init.el" initFile;
|
||||
|
|
@ -413,6 +414,7 @@ in
|
|||
})
|
||||
];
|
||||
|
||||
# This has no effect, will have to add a wrapper to emacs (or just copy this to ~/.emacs.d/init.el)
|
||||
environment.etc."emacs.d/init.el".text = ''
|
||||
(require 'hm-init)
|
||||
(provide 'init)
|
||||
|
|
|
|||
|
|
@ -13,14 +13,14 @@ let
|
|||
name = pname;
|
||||
value = rec {
|
||||
pkgwrap = mkOption {
|
||||
type = types.listOf types.package;
|
||||
type = with types; oneOf [ package (listOf package) ];
|
||||
default = cfg.pkgsets."${pname}".pkgs;
|
||||
description = ''
|
||||
Package Wrapper for packages using a wrapper function (like python, emacs, haskell, ...)
|
||||
'';
|
||||
};
|
||||
pkgs = mkOption {
|
||||
type = with types; listOf (nullOr attrs);
|
||||
type = types.unspecified;
|
||||
default = [];
|
||||
description = ''
|
||||
${pname} package list.
|
||||
|
|
@ -37,7 +37,8 @@ in {
|
|||
The list of metapackages to be installed.
|
||||
'';
|
||||
};
|
||||
pkgsets = listToAttrs (map pkgOption metapkgs);
|
||||
# Package names containing '::' are sub packages and should not have their own pkgset.
|
||||
pkgsets = listToAttrs (map pkgOption (lists.filter (v: !(strings.hasInfix "::" v)) metapkgs));
|
||||
services = mkOption {
|
||||
type = types.listOf types.str;
|
||||
default = [];
|
||||
|
|
|
|||
|
|
@ -4,25 +4,22 @@ with lib;
|
|||
|
||||
let
|
||||
gitpkgs = import /nixpkgs {};
|
||||
modefiles = lists.forEach
|
||||
(attrNames
|
||||
(filterAttrs (n: v: v == "regular")
|
||||
(builtins.readDir ./emacs)))
|
||||
(v: "./emacs/${v}");
|
||||
fn = import (toString ../../fn.nix) { inherit lib; };
|
||||
modefiles = fn.lst { p = (toString ./emacs); b = true; };
|
||||
in rec {
|
||||
nixpkgs.overlays = [
|
||||
(import (builtins.fetchTarball {
|
||||
url = https://github.com/nix-community/emacs-overlay/archive/master.tar.gz;
|
||||
}))
|
||||
];
|
||||
# nixpkgs.overlays = [
|
||||
# (import (builtins.fetchTarball {
|
||||
# url = https://github.com/nix-community/emacs-overlay/archive/master.tar.gz;
|
||||
# }))
|
||||
# ];
|
||||
imports = [
|
||||
../../options/emacs-init.nix
|
||||
# modefiles
|
||||
];
|
||||
] ++ modefiles;
|
||||
|
||||
programs.emacs.init = {
|
||||
enable = true;
|
||||
recommendedGcSettings = true;
|
||||
|
||||
prelude = ''
|
||||
;; Disable UI Clutter
|
||||
(menu-bar-mode -1)
|
||||
|
|
@ -75,7 +72,8 @@ in rec {
|
|||
(global-hl-line-mode t)
|
||||
(size-indication-mode t)
|
||||
(show-paren-mode t)
|
||||
|
||||
(setq split-height-threshold 200)
|
||||
(setq split-width-threshold nil)
|
||||
|
||||
|
||||
;; Font Config
|
||||
|
|
@ -95,6 +93,19 @@ in rec {
|
|||
'';
|
||||
};
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
### OLD STUFF
|
||||
# machine.pkgsets.emacs.pkgwrap = [(gitpkgs.pkgs.emacsWithPackages (ps: with ps; config.machine.pkgsets.emacs.pkgs))];
|
||||
#[
|
||||
# (pkgs.emacsWithPackagesFromUsePackage {
|
||||
|
|
|
|||
|
|
@ -1,19 +1,164 @@
|
|||
{ config, ... }:
|
||||
{ config, lib, pkgs, ... }:
|
||||
|
||||
mkIf (elem "emacs-company" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.company = {
|
||||
enable = true;
|
||||
diminish = [ "company-mode" ];
|
||||
hook = [ "(after-init . global-company-mode)" ];
|
||||
bind = { "\t" = "'company-complete-common"; };
|
||||
config = ''
|
||||
(setq company-idle-delay 0.3
|
||||
company-show-numbers t)
|
||||
'';
|
||||
extraConfig = ''
|
||||
:bind (:map company-mode-map
|
||||
([remap completion-at-point] . company-complete-common)
|
||||
([remap complete-symbol] . company-complete-common))
|
||||
'';
|
||||
with lib;
|
||||
|
||||
let
|
||||
# Source: https://github.com/Henry/dot-emacs/blob/master/my-lisp/company-pcomplete.el
|
||||
company-pcomplete = pkgs.writeText "company-pcomplete.el" ''
|
||||
;;; company-pcomplete.el --- company-mode pcomplete backend -*- lexical-binding: t -*-
|
||||
|
||||
;; Copyright (C) 2016 Free Software Foundation, Inc.
|
||||
|
||||
;; Author: Henry G. Weller
|
||||
|
||||
;; This file is part of GNU Emacs.
|
||||
|
||||
;; GNU Emacs is free software: you can redistribute it and/or modify
|
||||
;; it under the terms of the GNU General Public License as published by
|
||||
;; the Free Software Foundation, either version 3 of the License, or
|
||||
;; (at your option) any later version.
|
||||
|
||||
;; GNU Emacs is distributed in the hope that it will be useful,
|
||||
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
;; GNU General Public License for more details.
|
||||
|
||||
;; You should have received a copy of the GNU General Public License
|
||||
;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
|
||||
;;; Commentary:
|
||||
;;
|
||||
;; Based on `ac-pcomplete', see https://www.emacswiki.org/emacs/EshellCompletion
|
||||
;; and `pcomplete`, see pcomplete.el.
|
||||
|
||||
;;; Code:
|
||||
|
||||
(require 'company)
|
||||
(require 'cl-lib)
|
||||
(require 'pcomplete)
|
||||
|
||||
(defgroup company-pcomplete nil
|
||||
"Completion backend using pcomplete."
|
||||
:group 'company)
|
||||
|
||||
(defvar company-pcomplete-available 'unknown)
|
||||
|
||||
(defun company-pcomplete--prefix ()
|
||||
(let* ((pcomplete-stub)
|
||||
pcomplete-seen
|
||||
pcomplete-norm-func
|
||||
pcomplete-args
|
||||
pcomplete-last pcomplete-index
|
||||
(pcomplete-autolist pcomplete-autolist)
|
||||
(pcomplete-suffix-list pcomplete-suffix-list))
|
||||
(pcomplete-completions)
|
||||
(buffer-substring (pcomplete-begin) (point))))
|
||||
|
||||
(defun company-pcomplete--candidates ()
|
||||
(let* ((pcomplete-stub)
|
||||
(pcomplete-show-list t)
|
||||
pcomplete-seen pcomplete-norm-func
|
||||
pcomplete-args pcomplete-last pcomplete-index
|
||||
(pcomplete-autolist pcomplete-autolist)
|
||||
(pcomplete-suffix-list pcomplete-suffix-list)
|
||||
(candidates (pcomplete-completions))
|
||||
(prefix (buffer-substring (pcomplete-begin) (point)))
|
||||
;; Collect all possible completions for the current stub
|
||||
(cnds (all-completions pcomplete-stub candidates))
|
||||
(bnds (completion-boundaries pcomplete-stub candidates nil ""))
|
||||
(skip (- (length pcomplete-stub) (car bnds))))
|
||||
;; Replace the stub at the beginning of each candidate by the prefix
|
||||
(mapcar #'(lambda (cand) (concat prefix (substring cand skip))) cnds)))
|
||||
|
||||
(defun company-pcomplete-available ()
|
||||
(when (eq company-pcomplete-available 'unknown)
|
||||
(condition-case _err
|
||||
(progn
|
||||
(company-pcomplete--candidates)
|
||||
(setq company-pcomplete-available t))
|
||||
(error
|
||||
(message "Company: pcomplete not found")
|
||||
(setq company-pcomplete-available nil))))
|
||||
company-pcomplete-available)
|
||||
|
||||
;;;###autoload
|
||||
(defun company-pcomplete (command &optional _arg &rest ignored)
|
||||
"`company-mode' completion backend using `pcomplete'."
|
||||
(interactive (list 'interactive))
|
||||
(cl-case command
|
||||
(interactive (company-begin-backend 'company-pcomplete))
|
||||
(prefix (when (company-pcomplete-available)
|
||||
(company-pcomplete--prefix)))
|
||||
(candidates (company-pcomplete--candidates))
|
||||
(sorted t)))
|
||||
|
||||
(provide 'company-pcomplete)
|
||||
'';
|
||||
in mkIf (elem "emacs::company" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage = {
|
||||
company = {
|
||||
enable = true;
|
||||
diminish = [ "company-mode" ];
|
||||
hook = [ "(after-init . global-company-mode)" ];
|
||||
bind = { "\t" = "'company-complete-common"; };
|
||||
init = ''(require 'ffap)'';
|
||||
config = ''
|
||||
;; (setq company-tooltip-align-annotations t)
|
||||
(setq company-idle-delay 0.3
|
||||
company-show-numbers t)
|
||||
|
||||
${optionalString
|
||||
(elem "emacs::org" config.machine.pkgs) ''
|
||||
(load-file "${company-pcomplete}")''
|
||||
}
|
||||
'';
|
||||
extraConfig = ''
|
||||
:bind (:map company-mode-map
|
||||
([remap completion-at-point] . company-complete-common)
|
||||
([remap complete-symbol] . company-complete-common))
|
||||
'';
|
||||
};
|
||||
company-box = {
|
||||
enable = true;
|
||||
hook = [ "(company-mode . (lambda () (company-box-mode)))" ];
|
||||
config = ''
|
||||
(setq company-box-icons-alist 'company-box-icons-all-the-icons)
|
||||
|
||||
|
||||
(setq company-box-icons-lsp
|
||||
`(( 1 . ,(all-the-icons-faicon "file-text-o" :v-adjust -0.0575)) ; Text
|
||||
( 2 . ,(all-the-icons-faicon "cube" :v-adjust -0.0575)) ; Method
|
||||
( 3 . ,(all-the-icons-faicon "cube" :v-adjust -0.0575)) ; Function
|
||||
( 4 . ,(all-the-icons-faicon "cube" :v-adjust -0.0575)) ; Constructor
|
||||
( 5 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Field
|
||||
( 6 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Variable
|
||||
( 7 . ,(all-the-icons-faicon "cog" :v-adjust -0.0575)) ; Class
|
||||
( 8 . ,(all-the-icons-faicon "cogs" :v-adjust -0.0575)) ; Interface
|
||||
( 9 . ,(all-the-icons-alltheicon "less")) ; Module
|
||||
(10 . ,(all-the-icons-faicon "wrench" :v-adjust -0.0575)) ; Property
|
||||
(11 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Unit
|
||||
(12 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Value
|
||||
(13 . ,(all-the-icons-material "content_copy" :v-adjust -0.2)) ; Enum
|
||||
(14 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Keyword
|
||||
(15 . ,(all-the-icons-material "content_paste" :v-adjust -0.2)) ; Snippet
|
||||
(16 . ,(all-the-icons-material "palette" :v-adjust -0.2)) ; Color
|
||||
(17 . ,(all-the-icons-faicon "file" :v-adjust -0.0575)) ; File
|
||||
(18 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Reference
|
||||
(19 . ,(all-the-icons-faicon "folder" :v-adjust -0.0575)) ; Folder
|
||||
(20 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; EnumMember
|
||||
(21 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Constant
|
||||
(22 . ,(all-the-icons-faicon "cog" :v-adjust -0.0575)) ; Struct
|
||||
(23 . ,(all-the-icons-faicon "bolt" :v-adjust -0.0575)) ; Event
|
||||
(24 . ,(all-the-icons-faicon "tag" :v-adjust -0.0575)) ; Operator
|
||||
(25 . ,(all-the-icons-faicon "cog" :v-adjust -0.0575)) ; TypeParameter
|
||||
))
|
||||
'';
|
||||
};
|
||||
all-the-icons = { enable = true; };
|
||||
company-jedi = {
|
||||
enable = (elem "emacs::elpy" config.machine.pkgs);
|
||||
};
|
||||
};
|
||||
fonts.fonts = pkgs.emacs-all-the-icons-fonts.all;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -0,0 +1,21 @@
|
|||
{ config, lib, pkgs, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::doom-modeline" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.doom-modeline = {
|
||||
enable = true;
|
||||
hook = [ "(after-init . doom-modeline-mode)" ];
|
||||
config = ''
|
||||
(setq doom-modeline-icon t)
|
||||
(setq doom-modeline-height 25)
|
||||
(setq doom-modeline-bar-width 3)
|
||||
;; The default priority of detection is `ffip' > `projectile' > `project'.
|
||||
(setq doom-modeline-project-detection 'project)
|
||||
(setq doom-modeline-buffer-file-name-style 'truncate-upto-project)
|
||||
(setq doom-modeline-unicode-fallback nil)
|
||||
|
||||
(setq doom-modeline--battery-status t)
|
||||
'';
|
||||
};
|
||||
}
|
||||
|
|
@ -0,0 +1,16 @@
|
|||
{ config, lib, pkgs, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::doom-themes" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.doom-themes = {
|
||||
enable = true;
|
||||
config = ''
|
||||
;; Load the theme (doom-one, doom-molokai, etc); keep in mind that each theme
|
||||
;; may have their own settings.
|
||||
(load-theme 'doom-solarized-dark t)
|
||||
|
||||
;; ${optionalString (elem "emacs::org" config.machine.pkgs) "(doom-themes-org-config)"}
|
||||
'';
|
||||
};
|
||||
}
|
||||
|
|
@ -0,0 +1,36 @@
|
|||
{ config, lib, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::elpy" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.elpy = {
|
||||
enable = true;
|
||||
after = [ "python" ];
|
||||
command = [ "elpy-enable" ];
|
||||
hook = [ ''
|
||||
(elpy-mode
|
||||
. (lambda ()
|
||||
(set (make-local-variable 'company-backends)
|
||||
'((company-dabbrev-code company-yasnippet elpy-company-backend)))))
|
||||
'' ]
|
||||
++ (optional (elem "emacs::flyspell" config.machine.pkgs) "(elpy-mode . (lambda () (flyspell-prog-mode)))")
|
||||
++ (optional (elem "emacs::flycheck" config.machine.pkgs) "(elpy-mode . (lambda () (flycheck-mode)))");
|
||||
bindLocal = { elpy-mode-map = {
|
||||
"<tab>" = "company-indent-or-complete-common";
|
||||
};};
|
||||
init = ''(with-eval-after-load 'python (elpy-enable))'';
|
||||
config = ''
|
||||
(setq elpy-project-root-finder-functions '(elpy-project-find-git-root elpy-project-find-python-root elpy-project-find-hg-root elpy-project-find-svn-root))
|
||||
(setq elpy-rpc-backend "jedi")
|
||||
(setq python-shell-interpreter "ipython"
|
||||
python-shell-interpreter-args "-i --simple-prompt")
|
||||
|
||||
${optionalString (elem "emacs::flycheck" config.machine.pkgs) ''
|
||||
;; manually set what python-mypy is and configure it to ignore 3rd party imports
|
||||
(setq elpy-modules (delq 'elpy-module-flymake elpy-modules))
|
||||
(setq-default flycheck-checker 'python-pylint)
|
||||
(flycheck-add-next-checker 'python-pylint 'python-mypy t)
|
||||
(flycheck-add-next-checker 'python-mypy 'python-flake8 t)''}
|
||||
'';
|
||||
};
|
||||
}
|
||||
|
|
@ -0,0 +1,35 @@
|
|||
{ config, lib, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::flycheck" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.flycheck = {
|
||||
enable = true;
|
||||
command = [ "global-flycheck-mode" ];
|
||||
defer = 1;
|
||||
bind = {};
|
||||
config = ''
|
||||
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.flycheck-haskell = {
|
||||
enable = (elem "emacs::haskell" config.machine.pkgs);
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.flycheck-irony = {
|
||||
enable = (elem "emacs::irony" config.machine.pkgs);
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.flycheck-mypy = {
|
||||
enable = (elem "emacs::elpy" config.machine.pkgs);
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.pylint = {
|
||||
enable = (elem "emacs::elpy" config.machine.pkgs);
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.flycheck-rust = {
|
||||
enable = (elem "emacs::rust" config.machine.pkgs);
|
||||
};
|
||||
}
|
||||
|
|
@ -1,6 +1,8 @@
|
|||
{ config, ... }:
|
||||
{ config, lib, ... }:
|
||||
|
||||
mkIf (elem "emacs-flyspell" config.machine.pkgs) {
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::flyspell" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.flyspell = {
|
||||
enable = true;
|
||||
diminish = [ "flyspell-mode" ];
|
||||
|
|
|
|||
|
|
@ -0,0 +1,55 @@
|
|||
{ config, lib, pkgs, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::lsp" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage = {
|
||||
lsp-mode = {
|
||||
enable = true;
|
||||
command = [ "lsp-mode" ];
|
||||
bind = {
|
||||
"C-c r r" = "lsp-rename";
|
||||
"C-c r f" = "lsp-format-buffer";
|
||||
};
|
||||
config = ''
|
||||
(setq lsp-eldoc-render-all nil)
|
||||
|
||||
(defvar lsp-language-id-configuration '(
|
||||
${optionalString (elem "emacs::rust" config.machine.pkgs
|
||||
''(rust-mode . "rust")'')}
|
||||
))
|
||||
'';
|
||||
};
|
||||
|
||||
lsp-ui = {
|
||||
enable = true;
|
||||
after = [ "lsp" ];
|
||||
command = [ "lsp-ui-mode" "lsp-ui-sideline-mode" ];
|
||||
config = ''
|
||||
(setq lsp-ui-sideline-enable t
|
||||
lsp-ui-sideline-show-symbol nil
|
||||
lsp-ui-sideline-show-hover nil
|
||||
lsp-ui-sideline-show-code-actions t
|
||||
lsp-ui-sideline-update-mode 'point)
|
||||
'';
|
||||
};
|
||||
|
||||
lsp-ui-flycheck = {
|
||||
enable = true;
|
||||
after = [ "lsp-ui" ]
|
||||
++ optional (elem "emacs::flycheck" config.machine.pkgs) "flycheck";
|
||||
};
|
||||
|
||||
lsp-java = {
|
||||
enable = (elem "emacs::java" config.machine.pkgs);
|
||||
command = [ "lsp-java-enable" ];
|
||||
hook = [ ''
|
||||
(java-mode . (lambda ()
|
||||
(lsp-java-enable)
|
||||
(lsp-ui-sideline-mode)
|
||||
(lsp-ui-flycheck-enable t)
|
||||
(setq-local company-backends (list 'company-lsp))))
|
||||
'' ];
|
||||
};
|
||||
};
|
||||
}
|
||||
|
|
@ -0,0 +1,12 @@
|
|||
{ config, lib, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::magit" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.magit = {
|
||||
enable = true;
|
||||
bind = {
|
||||
"C-c g" = "magit-status";
|
||||
};
|
||||
};
|
||||
}
|
||||
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs-mu4e" config.machine.pkgs) {
|
||||
mkIf (elem "emacs::mu4e" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.mu4e = {
|
||||
enable = true;
|
||||
package = epkgs: null;
|
||||
|
|
@ -47,29 +47,7 @@ mkIf (elem "emacs-mu4e" config.machine.pkgs) {
|
|||
(setq message-kill-buffer-on-exit t)
|
||||
|
||||
|
||||
(setq mu4e-contexts
|
||||
`(${map
|
||||
(rec { name, fullName, address, sServer, sPort, sUser ? address }: ''
|
||||
,(make-mu4e-context
|
||||
:name ${name}
|
||||
:vars '((user-mail-address . ${address} )
|
||||
(user-full-name . ${fullName} )
|
||||
(mu4e-sent-folder . "/Sent")
|
||||
(mu4e-drafts-folder . "/Drafts")
|
||||
(mu4e-trash-folder . "/Deleted")
|
||||
(mu4e-refile-folder . "/Archiv")
|
||||
(smtpmail-smtp-user . ${sUser} )
|
||||
(smtpmail-auth-credentials . (expand-file-name "~/mail/secret/.authinfo.gpg"))
|
||||
(smtpmail-default-smtp-server . ${sServer} )
|
||||
(smtpmail-smtp-server . ${sServer} )
|
||||
(smtpmail-stream-type . starttls)
|
||||
(smtpmail-smtp-service . ${sPort} )
|
||||
)
|
||||
)
|
||||
'';
|
||||
)
|
||||
(import "${config.machine.secretPath}/secrets.nix").mu4e}
|
||||
))
|
||||
;; mailAcc config goes here
|
||||
|
||||
|
||||
(defun my-browse-url-firefox-privately (url &optional new-window)
|
||||
|
|
@ -89,10 +67,16 @@ mkIf (elem "emacs-mu4e" config.machine.pkgs) {
|
|||
:load-path ${pkgs.mu4e}/share/emacs/site-lisp/mu4e
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.mu4e-alert = {
|
||||
enable = true;
|
||||
hook = [ "'after-init-hook" = "#'mu4e-alert-enable-mode-line-display" ];
|
||||
hook = [ "'after-init-hook #'mu4e-alert-enable-mode-line-display" ];
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.org-mu4e = {
|
||||
enable = (elem "emacs::org" config.machine.pkgs);
|
||||
};
|
||||
|
||||
environment.systemPackages = [
|
||||
mu4e
|
||||
isync
|
||||
|
|
|
|||
|
|
@ -0,0 +1,10 @@
|
|||
{ config, lib, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::nix-mode" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.nix-mode = {
|
||||
enable = true;
|
||||
mode = [ ''"\\.nix\\'"'' ];
|
||||
};
|
||||
}
|
||||
|
|
@ -0,0 +1,419 @@
|
|||
{ config, lib, pkgs, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::org" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.org = {
|
||||
enable = true;
|
||||
package = epkgs: [ epkgs.org epkgs.org-plus-contrib ];
|
||||
mode = [ ''("\\.org\\'" . org-mode)'' ];
|
||||
command = [ "org-mode" ];
|
||||
hook = [ "(org-mode . (lambda () (org-indent-mode)))" ''
|
||||
(org-mode
|
||||
. (lambda ()
|
||||
;; Automatic line-wrapping in org-mode
|
||||
;;(auto-fill-mode 1)
|
||||
|
||||
(setq completion-at-point-functions
|
||||
'(org-completion-symbols
|
||||
ora-cap-filesystem))))
|
||||
'' ''
|
||||
(org-mode
|
||||
. (lambda ()
|
||||
"Beautify Org Checkbox Symbol"
|
||||
(push '("[ ]" . "☐" ) prettify-symbols-alist)
|
||||
(push '("[X]" . "☑" ) prettify-symbols-alist)
|
||||
(push '("[-]" . "❍" ) prettify-symbols-alist)
|
||||
(prettify-symbols-mode)))
|
||||
''
|
||||
] ++ optional (elem "emacs::flyspell" config.machine.pkgs) "(org-mode . (lambda () (flyspell-mode)))";
|
||||
bind = {
|
||||
"C-c a" = "org-agenda";
|
||||
};
|
||||
bindLocal = { org-mode-map = {
|
||||
"M-<up>" = "org-metaup";
|
||||
"M-<down>" = "org-metadown";
|
||||
"M-." = "org-open-at-point";
|
||||
"M-," = "org-mark-ring-goto";
|
||||
"M-S-<return>" = "org-insert-todo-heading-respect-content";
|
||||
"M-<return>" = "org-meta-return";
|
||||
"M-p" = "org-previous-visible-heading";
|
||||
"M-n" = "org-next-visible-heading";
|
||||
} // (optionalAttrs (elem "emacs::company" config.machine.pkgs) {
|
||||
"<M-tab>" = "company-pcomplete";
|
||||
}); };
|
||||
config = ''
|
||||
;; Insead of "..." show "…" when there's hidden folded content
|
||||
|
||||
;; org-prettify
|
||||
(defface org-checkbox-done-text
|
||||
'((t (:foreground "#71696A" :strike-through t)))
|
||||
"Face for the text part of a checked org-mode checkbox.")
|
||||
|
||||
(font-lock-add-keywords
|
||||
'org-mode
|
||||
`(("^[ \t]*\\(?:[-+*]\\|[0-9]+[).]\\)[ \t]+\\(\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\[\\(?:X\\|\\([0-9]+\\)/\\2\\)\\][^\n]*\n\\)"
|
||||
1 'org-checkbox-done-text prepend))
|
||||
'append)
|
||||
|
||||
;; Some characters to choose from: …, ⤵, ▼, ↴, ⬎, ⤷, and ⋱
|
||||
(setq org-ellipsis " ▼")
|
||||
;; get nice looking tables (only for non org-tables; rarely used)
|
||||
(setq table-cell-horizontal-chars "\u2501")
|
||||
(setq table-cell-vertical-char ?\u2503)
|
||||
(setq table-cell-intersection-char ?\u254B)
|
||||
|
||||
(setq org-directory "~/Documents/org/")
|
||||
|
||||
;; Show headings up to level 2 by default when opening an org files
|
||||
(setq org-startup-folded 'content)
|
||||
|
||||
;; Show inline images by default
|
||||
(setq org-startup-with-inline-images t)
|
||||
|
||||
;; Add more levels to headlines that get displayed with imenu
|
||||
(setq org-imenu-depth 5)
|
||||
|
||||
;; Enter key follows links (= C-c C-o)
|
||||
(setq org-return-follows-link t)
|
||||
|
||||
;; Don't remove links after inserting
|
||||
(setq org-keep-stored-link-after-insertion t)
|
||||
|
||||
(setq org-tag-alist (quote ((:startgroup)
|
||||
("WAITING" . ?w)
|
||||
("HOLD" . ?h)
|
||||
("CANCELLED" . ?c)
|
||||
("NOTE" . ?n)
|
||||
(:endgroup)
|
||||
("PERSONAL" . ?P)
|
||||
("WORK" . ?W)
|
||||
("ATOMX" . ?A)
|
||||
("E5" . ?E)
|
||||
("HOGASO" . ?H)
|
||||
("ORG" . ?o)
|
||||
("crypt" . ?C)
|
||||
("FLAGGED" . ??))))
|
||||
|
||||
;; Allow setting single tags without the menu
|
||||
(setq org-fast-tag-selection-single-key (quote expert))
|
||||
|
||||
(setq org-archive-mark-done nil)
|
||||
(setq org-archive-location "%s_archive::* Archived Tasks")
|
||||
|
||||
;; C-RET, C-S-RET insert new heading after current task content
|
||||
(setq org-insert-heading-respect-content nil)
|
||||
|
||||
;; Show a little bit more when using sparse-trees
|
||||
(setq org-show-following-heading t)
|
||||
(setq org-show-hierarchy-above t)
|
||||
(setq org-show-siblings (quote ((default))))
|
||||
|
||||
;; don't show * / = etc
|
||||
(setq org-hide-emphasis-markers t)
|
||||
|
||||
;; leave highlights in sparse tree after edit. C-c C-c removes highlights
|
||||
(setq org-remove-highlights-with-change nil)
|
||||
|
||||
;; M-RET should not split the lines
|
||||
(setq org-M-RET-may-split-line '((default . nil)))
|
||||
|
||||
(setq org-special-ctrl-a/e t)
|
||||
(setq org-special-ctrl-k t)
|
||||
(setq org-yank-adjusted-subtrees t)
|
||||
|
||||
;; Show org entities as UTF-8 characters (e.g. \sum as ∑)
|
||||
(setq org-pretty-entities t)
|
||||
;; But Don't print "bar" as subscript in "foo_bar"
|
||||
(setq org-pretty-entities-include-sub-superscripts nil)
|
||||
;; And also don't display ^ or _ as super/subscripts
|
||||
(setq org-use-sub-superscripts nil)
|
||||
;; undone TODO entries will block switching the parent to DONE
|
||||
(setq org-enforce-todo-dependencies t)
|
||||
|
||||
(setq org-use-fast-todo-selection t)
|
||||
|
||||
(setq org-todo-keywords
|
||||
(quote ((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d)")
|
||||
(sequence "WAITING(w@/!)" "HOLD(h@/!)" "|" "CANCELLED(c@/!)" "PHONE" "MEETING"))))
|
||||
|
||||
(setq org-todo-keyword-faces
|
||||
(quote (("TODO" :foreground "red" :weight bold)
|
||||
("NEXT" :foreground "blue" :weight bold)
|
||||
("DONE" :foreground "forest green" :weight bold)
|
||||
("WAITING" :foreground "orange" :weight bold)
|
||||
("HOLD" :foreground "magenta" :weight bold)
|
||||
("CANCELLED" :foreground "forest green" :weight bold)
|
||||
("MEETING" :foreground "forest green" :weight bold)
|
||||
("PHONE" :foreground "forest green" :weight bold))))
|
||||
|
||||
;; Auto completion for symbols in org-mode
|
||||
;; https://oremacs.com/2017/10/04/completion-at-point/
|
||||
(defun org-completion-symbols ()
|
||||
(when (looking-back "[`~=][a-zA-Z]+" nil)
|
||||
(let (cands)
|
||||
(save-match-data
|
||||
(save-excursion
|
||||
(goto-char (point-min))
|
||||
(while (re-search-forward "[`~=]\\([a-zA-Z.\\-_]+\\)[`~=]" nil t)
|
||||
(cl-pushnew
|
||||
(match-string-no-properties 0) cands :test 'equal))
|
||||
cands))
|
||||
(when cands
|
||||
(list (match-beginning 0) (match-end 0) cands)))))
|
||||
|
||||
(defun ora-cap-filesystem ()
|
||||
(let (path)
|
||||
(when (setq path (ffap-string-at-point))
|
||||
(when (string-match "\\`file:\\(.*\\)\\'" path)
|
||||
(setq path (match-string 1 path)))
|
||||
(let ((compl (all-completions path #'read-file-name-internal)))
|
||||
(when compl
|
||||
(let* ((str (car compl))
|
||||
(offset
|
||||
(let ((i 0)
|
||||
(len (length str)))
|
||||
(while (and (< i len)
|
||||
(equal (get-text-property i 'face str)
|
||||
'completions-common-part))
|
||||
(cl-incf i))
|
||||
i)))
|
||||
(list (- (point) offset) (point) compl)))))))
|
||||
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.ob = {
|
||||
enable = true;
|
||||
defer = true;
|
||||
init = ''
|
||||
(add-hook 'org-babel-after-execute-hook 'org-display-inline-images 'append)
|
||||
'';
|
||||
config = ''
|
||||
(setq org-confirm-babel-evaluate nil) ; don't prompt me to confirm everytime I want to evaluate a block
|
||||
|
||||
(defun org-babel-restart-session-to-point (&optional arg)
|
||||
"Restart session up to the src-block in the current point.
|
||||
Goes to beginning of buffer and executes each code block with
|
||||
`org-babel-execute-src-block' that has the same language and
|
||||
session as the current block. ARG has same meaning as in
|
||||
`org-babel-execute-src-block'."
|
||||
(interactive "P")
|
||||
(unless (org-in-src-block-p)
|
||||
(error "You must be in a src-block to run this command"))
|
||||
(let* ((current-point (point-marker))
|
||||
(info (org-babel-get-src-block-info))
|
||||
(lang (nth 0 info))
|
||||
(params (nth 2 info))
|
||||
(session (cdr (assoc :session params))))
|
||||
(save-excursion
|
||||
(goto-char (point-min))
|
||||
(while (re-search-forward org-babel-src-block-regexp nil t)
|
||||
;; goto start of block
|
||||
(goto-char (match-beginning 0))
|
||||
(let* ((this-info (org-babel-get-src-block-info))
|
||||
(this-lang (nth 0 this-info))
|
||||
(this-params (nth 2 this-info))
|
||||
(this-session (cdr (assoc :session this-params))))
|
||||
(when
|
||||
(and
|
||||
(< (point) (marker-position current-point))
|
||||
(string= lang this-lang)
|
||||
(src-block-in-session-p session))
|
||||
(org-babel-execute-src-block arg)))
|
||||
;; move forward so we can find the next block
|
||||
(forward-line)))))
|
||||
|
||||
(defun org-babel-kill-session ()
|
||||
"Kill session for current code block."
|
||||
(interactive)
|
||||
(unless (org-in-src-block-p)
|
||||
(error "You must be in a src-block to run this command"))
|
||||
(save-window-excursion
|
||||
(org-babel-switch-to-session)
|
||||
(kill-buffer)))
|
||||
|
||||
(defun org-babel-remove-result-buffer ()
|
||||
"Remove results from every code block in buffer."
|
||||
(interactive)
|
||||
(save-excursion
|
||||
(goto-char (point-min))
|
||||
(while (re-search-forward org-babel-src-block-regexp nil t)
|
||||
(org-babel-remove-result))))
|
||||
|
||||
|
||||
;; this adds a "new language" in babel that gets exported as js in html
|
||||
;; https://www.reddit.com/r/orgmode/comments/5bi6ku/tip_for_exporting_javascript_source_block_to/
|
||||
(add-to-list 'org-src-lang-modes '("inline-js" . javascript))
|
||||
(defvar org-babel-default-header-args:inline-js
|
||||
'((:results . "html")
|
||||
(:exports . "results")))
|
||||
(defun org-babel-execute:inline-js (body _params)
|
||||
(format "<script type=\"text/javascript\">\n%s\n</script>" body))
|
||||
|
||||
;; Path when plantuml is installed from AUR (package `plantuml')
|
||||
(setq org-plantuml-jar-path "/opt/plantuml/plantuml.jar")
|
||||
|
||||
;; add all languages to org mode
|
||||
(org-babel-do-load-languages
|
||||
'org-babel-load-languages
|
||||
'((C . t)
|
||||
;;(R . t)
|
||||
(asymptote)
|
||||
(awk)
|
||||
(calc . t)
|
||||
(clojure . t)
|
||||
(comint)
|
||||
(css)
|
||||
(ditaa . t)
|
||||
(dot . t)
|
||||
(emacs-lisp . t)
|
||||
(fortran)
|
||||
(gnuplot . t)
|
||||
(haskell)
|
||||
(io)
|
||||
(java)
|
||||
(js . t)
|
||||
(latex)
|
||||
(ledger . t)
|
||||
(lilypond)
|
||||
(lisp)
|
||||
(lua . t)
|
||||
(matlab)
|
||||
(maxima)
|
||||
(mscgen)
|
||||
(ocaml)
|
||||
(octave . t)
|
||||
(org . t)
|
||||
(perl)
|
||||
(picolisp)
|
||||
(plantuml . t)
|
||||
(python . t)
|
||||
;; (ipython . t)
|
||||
;; (restclient . t)
|
||||
(ref)
|
||||
(ruby)
|
||||
(sass)
|
||||
(scala)
|
||||
(scheme)
|
||||
(screen)
|
||||
(shell . t)
|
||||
(shen)
|
||||
(snippet)
|
||||
(sql . t)
|
||||
(sqlite . t)))
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.org-src = {
|
||||
enable = true;
|
||||
defer = true;
|
||||
init = ''(put 'org-src-preserve-indentation 'safe-local-variable 'booleanp)'';
|
||||
config = ''
|
||||
(setq org-src-window-setup 'current-window)
|
||||
|
||||
(setq org-src-fontify-natively t) ; syntax highlighting for source code blocks
|
||||
|
||||
;; Tab should do indent in code blocks
|
||||
;; I think I hate this function (causes scroll on TAB
|
||||
(setq org-src-tab-acts-natively t)
|
||||
;; ?Fix weird scrolling
|
||||
|
||||
;; Don't remove (or add) any extra whitespace
|
||||
(setq org-src-preserve-indentation nil)
|
||||
(setq org-edit-src-content-indentation 0)
|
||||
|
||||
;;; Some helper function to manage org-babel sessions
|
||||
|
||||
(defun src-block-in-session-p (&optional name)
|
||||
"Return if src-block is in a session of NAME.
|
||||
NAME may be nil for unnamed sessions."
|
||||
(let* ((info (org-babel-get-src-block-info))
|
||||
;;(lang (nth 0 info))
|
||||
;;(body (nth 1 info))
|
||||
(params (nth 2 info))
|
||||
(session (cdr (assoc :session params))))
|
||||
|
||||
(cond
|
||||
;; unnamed session, both name and session are nil
|
||||
((and (null session)
|
||||
(null name))
|
||||
t)
|
||||
;; Matching name and session
|
||||
((and
|
||||
(stringp name)
|
||||
(stringp session)
|
||||
(string= name session))
|
||||
t)
|
||||
;; no match
|
||||
(t nil))))
|
||||
|
||||
;; dot == graphviz-dot
|
||||
(add-to-list 'org-src-lang-modes '("dot" . graphviz-dot))
|
||||
|
||||
;; Add 'conf-mode' to org-babel
|
||||
(add-to-list 'org-src-lang-modes '("ini" . conf))
|
||||
(add-to-list 'org-src-lang-modes '("conf" . conf))
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.org-tempo = {
|
||||
enable = true;
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.ox = {
|
||||
enable = true;
|
||||
defer = true;
|
||||
command = [];
|
||||
config = ''
|
||||
;; Use html5 as org export and use new tags
|
||||
(setq org-html-doctype "html5")
|
||||
(setq org-html-html5-fancy t)
|
||||
;; Don't add html footer to export
|
||||
(setq org-html-postamble nil)
|
||||
;; Don't export ^ or _ as super/subscripts
|
||||
(setq org-export-with-sub-superscripts nil)
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.ox-gfm = {
|
||||
enable = true;
|
||||
after = [ "ox" ];
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.ox-rst = {
|
||||
enable = true;
|
||||
after = [ "ox" ];
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.ox-md = {
|
||||
enable = true;
|
||||
after = [ "ox" ];
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.org-bullets = {
|
||||
enable = true;
|
||||
hook = [ "(org-mode . org-bullets-mode)" ];
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.org-crypt = {
|
||||
enable = true;
|
||||
after = [ "org" ];
|
||||
bindLocal = { org-mode-map = {
|
||||
"C-c d" = "org-decrypt-entry";
|
||||
"C-c e" = "org-encrypt-entry";
|
||||
};};
|
||||
config = ''
|
||||
(org-crypt-use-before-save-magic)
|
||||
(setq org-tags-exclude-from-inheritance (quote ("crypt")))
|
||||
;; GPG key to use for encryption
|
||||
(setq org-crypt-key "BD9667B90757EAE9CDFE510A59A28744FE81FFEB")
|
||||
;; don't ask to disable auto-save
|
||||
(setq org-crypt-disable-auto-save nil)
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.org-drill = {
|
||||
enable = true;
|
||||
};
|
||||
}
|
||||
|
|
@ -1,7 +1,9 @@
|
|||
{ config, ... }:
|
||||
{ config, lib, ... }:
|
||||
|
||||
mkIf (elem "emacs-poerline" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.solarized-theme = {
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::powerline" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.powerline = {
|
||||
enable = true;
|
||||
config = ''
|
||||
;; color palette from https://github.com/kuanyui/moe-theme.el/blob/master/moe-theme.el#L283
|
||||
|
|
|
|||
|
|
@ -0,0 +1,39 @@
|
|||
{ config, lib, pkgs, ... }:
|
||||
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::rust" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.rust-mode = {
|
||||
enable = true;
|
||||
hook = [ ''(rust-mode . (lambda () (racer-mode)))'' ];
|
||||
mode = [ ''("\\.rs\\'" . rust-mode)'' ];
|
||||
command = [ "rust-mode" ];
|
||||
config = ''
|
||||
(setq rust-rustfmt-bin "${pkgs.rustfmt}/bin/rustfmt")
|
||||
(setq rust-format-on-save t)
|
||||
'';
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.cargo = {
|
||||
enable = true;
|
||||
defer = true;
|
||||
# hook = [ ''ru];
|
||||
};
|
||||
|
||||
programs.emacs.init.usePackage.racer = {
|
||||
enable = true;
|
||||
defer = true;
|
||||
bindLocal = optionalAttrs (elem "emacs::company" config.machine.pkgs) { rust-mode-map = {
|
||||
"<tab>" = "company-indent-or-complete-common";
|
||||
};};
|
||||
hook = [
|
||||
''(racer-mode . (lambda () (eldoc-mode)))''
|
||||
] ++ optional (elem "emacs::company" config.machine.pkgs) ''(racer-mode . (lambda () (company-mode)))'';
|
||||
|
||||
config = ''
|
||||
(setq racer-rust-src-path (concat (getenv "HOME")
|
||||
"/.rustup/toolchains/nightly-x86_64-unknown-linux-gnu/lib/rustlib/src/rust/src/"))
|
||||
(setq racer-cmd "${pkgs.rustracer}/bin/racer")
|
||||
'';
|
||||
};
|
||||
}
|
||||
|
|
@ -1,6 +1,8 @@
|
|||
{ config, ... }:
|
||||
{ config, lib, ... }:
|
||||
|
||||
mkIf (elem "emacs-solarized-theme" config.machine.pkgs) {
|
||||
with lib;
|
||||
|
||||
mkIf (elem "emacs::solarized-theme" config.machine.pkgs) {
|
||||
programs.emacs.init.usePackage.solarized-theme = {
|
||||
enable = true;
|
||||
config = "(load-theme 'solarized-dark t)";
|
||||
|
|
|
|||
|
|
@ -4,20 +4,23 @@ with lib;
|
|||
|
||||
let
|
||||
cfg = config.machine;
|
||||
pkgsets = (lists.forEach
|
||||
(attrNames (filterAttrs (n: v: v == "regular") (builtins.readDir (toString ./pkgsets))))
|
||||
(v: (./. + "/pkgsets/${v}")));
|
||||
fn = import (toString ../fn.nix) { inherit lib; };
|
||||
pkgsets = map (v: (toString ./.) + "/pkgsets/${v}") (fn.lsf (toString ./pkgsets));
|
||||
in {
|
||||
imports = pkgsets;
|
||||
|
||||
environment.systemPackages = flatten (lists.forEach
|
||||
(attrVals cfg.pkgs cfg.pkgsets)
|
||||
(v: v.pkgwrap));
|
||||
environment.systemPackages = flatten
|
||||
(lists.forEach
|
||||
(attrVals
|
||||
(filter
|
||||
(v: !(strings.hasInfix "::" v)) cfg.pkgs)
|
||||
cfg.pkgsets)
|
||||
(v: v.pkgwrap));
|
||||
|
||||
# services.emacs = mkIf (elem "emacs" cfg.pkgs) {
|
||||
# defaultEditor = true;
|
||||
# enable = true;
|
||||
# install = true;
|
||||
# package = (elemAt cfg.pkgsets.emacs.pkgwrap 0);
|
||||
# };
|
||||
services.emacs = mkIf (elem "emacs" cfg.pkgs) {
|
||||
defaultEditor = true;
|
||||
enable = true;
|
||||
install = true;
|
||||
package = cfg.pkgsets.emacs.pkgwrap;
|
||||
};
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue