From 3a26b26766454af43ea39018a0ba1890bec99630 Mon Sep 17 00:00:00 2001
From: Alan Pearce
Date: Thu, 1 Jun 2017 21:53:40 +0200
Subject: Emacs: Fix windows check

file-to-string isn't actually a built-in function, even though it's
named like one.
---
 emacs/.emacs.d/init.org | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'emacs')

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
-- 
cgit 1.4.1