diff options
author | Alex Branham <alex.branham@gmail.com> | 2019-07-07 08:32:00 -0500 |
---|---|---|
committer | Alex Branham <alex.branham@gmail.com> | 2019-07-07 08:35:10 -0500 |
commit | b86c2c54e521ab8eccb96873d6c62a93bddc80de (patch) | |
tree | fff05323e81af242096ce3f355f682b32d28e57a /pkgs | |
parent | beff2f8d75ef2c65017fb25e251337c6bb2e950d (diff) |
emacs: Silence compiler warnings in site-start.el
Diffstat (limited to 'pkgs')
-rw-r--r-- | pkgs/applications/editors/emacs/site-start.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/pkgs/applications/editors/emacs/site-start.el b/pkgs/applications/editors/emacs/site-start.el index 34addc33a59c..de4708b88908 100644 --- a/pkgs/applications/editors/emacs/site-start.el +++ b/pkgs/applications/editors/emacs/site-start.el @@ -1,6 +1,7 @@ +;; -*- lexical-binding: t; -*- (defun nix--profile-paths () - "Returns a list of all paths in the NIX_PROFILES environment -variable, ordered from more-specific (the user profile) to the + "Return a list of all paths in NIX_PROFILES. +The list is ordered from more-specific (the user profile) to the least specific (the system profile)" (reverse (split-string (or (getenv "NIX_PROFILES") "")))) @@ -23,6 +24,7 @@ least specific (the system profile)" ;;; Make `woman' find the man pages +(defvar woman-manpath) (eval-after-load 'woman '(setq woman-manpath (append (mapcar (lambda (x) (concat x "/share/man/")) @@ -30,6 +32,7 @@ least specific (the system profile)" woman-manpath))) ;;; Make tramp work for remote NixOS machines +(defvar tramp-remote-path) (eval-after-load 'tramp-sh ;; TODO: We should also add the other `NIX_PROFILES' to this path. ;; However, these are user-specific, so we would need to discover @@ -42,6 +45,7 @@ least specific (the system profile)" ;;; the current file: ;;; from: /nix/store/<hash>-emacs-<version>/share/emacs/site-lisp/site-start.el ;;; to: /nix/store/<hash>-emacs-<version>/share/emacs/<version>/src/ +(defvar find-function-C-source-directory) (let ((emacs (file-name-directory ; .../emacs/ (directory-file-name ; .../emacs/site-lisp |