diff options
| author | Alan Pearce | 2017-06-01 21:53:40 +0200 |
|---|---|---|
| committer | Alan Pearce | 2017-06-01 21:53:40 +0200 |
| commit | 3a26b26766454af43ea39018a0ba1890bec99630 (patch) | |
| tree | 9cd8b45d6ba8ae0fc002e1a22168cdb09111486d | |
| parent | f2f351569ffac639d5773d52f7482e77528eeb2c (diff) | |
| download | dotfiles-3a26b26766454af43ea39018a0ba1890bec99630.tar.lz dotfiles-3a26b26766454af43ea39018a0ba1890bec99630.tar.zst dotfiles-3a26b26766454af43ea39018a0ba1890bec99630.zip | |
Emacs: Fix windows check
file-to-string isn't actually a built-in function, even though it's named like one.
| -rw-r--r-- | emacs/.emacs.d/init.org | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org index 070f48c..da47658 100644 --- a/emacs/.emacs.d/init.org +++ b/emacs/.emacs.d/init.org @@ -21,8 +21,11 @@ Open Emacs with just a plain window. No graphics or messages, please! Are we running on Windows via the WSL? #+BEGIN_SRC emacs-lisp -(when (string-match "Microsoft$" (file-to-string "/proc/sys/kernel/osrelease")) - (setq system-type 'gnu/linux/windows)) +(with-temp-buffer + (insert-file-contents-literally "/proc/sys/kernel/osrelease") + (decode-coding-region (point-min) (point-max) 'utf-8 t) + (when (string-match "Microsoft$" (buffer-string)) + (setq system-type 'gnu/linux/windows))) #+END_SRC ** Compatibility |