diff options
author | Alan Pearce | 2017-09-15 12:19:57 +0200 |
---|---|---|
committer | Alan Pearce | 2017-09-15 12:19:57 +0200 |
commit | edc7739837f4ecbf568405835c5470ab4ac222dd (patch) | |
tree | 5481b73b8fcf31d85f784bf464893e61dee8a3af | |
parent | 54c18184114b266cec0966b663e12e60c52ed985 (diff) | |
download | nixfiles-edc7739837f4ecbf568405835c5470ab4ac222dd.tar.lz nixfiles-edc7739837f4ecbf568405835c5470ab4ac222dd.tar.zst nixfiles-edc7739837f4ecbf568405835c5470ab4ac222dd.zip |
Emacs: Remove nix info from frame title
-rw-r--r-- | emacs/.emacs.d/main.el | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el index 1caab89f..4ccb261d 100644 --- a/emacs/.emacs.d/main.el +++ b/emacs/.emacs.d/main.el @@ -272,25 +272,8 @@ (line-number-mode -1) (size-indication-mode t) - (require 'f) (setq frame-title-format (list "Emacs" - (if (and nix-emacs invocation-directory) - (list " (Nix Generation " - (cadr - (split-string (f-base - (car - (last (seq-take-while - (lambda (s) (s-contains? "profile" s)) - (split-string - (s-chomp (shell-command-to-string (concat "nix-store -q --roots " invocation-directory))) - "\n"))))) - "-")) - " " - (s-left 6 (nth 3 (f-split invocation-directory))) - "..." - (s-right 6 (car (split-string (nth 3 (f-split invocation-directory)) "-"))) - ")")) '(buffer-file-name " — %f") '(dired-directory (" — " dired-directory)))) ;; #+END_SRC |