Honor XDG_RUNTIME_DIR

Thanks to Alain Kalker <a.c.kalker@gmail.com> for this change.
brailcom · Oct 25, 2014 · 3d72981 · 3d72981
1 parent 447a21e
commit 3d72981
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 1 deletion.
diff --git a/NEWS b/NEWS
@@ -1,5 +1,12 @@
 User-visible changes to speechd-el:
 
+* Changes in speechd-el 2.8
+
+** XDG_RUNTIME_DIR environment variable is honored now.
+
+Thanks to Alain Kalker for this change.
+
+
 * Changes in speechd-el 2.7
 
 ** Minor bug fixes.

diff --git a/speechd.el b/speechd.el
@@ -494,7 +494,9 @@ current voice."
               :remote (or socket-name
                           (or (getenv "SPEECHD_SOCK")
                               (expand-file-name
-                               "~/.speech-dispatcher/speechd.sock")))))
+			       (let ((runtime-dir (getenv "XDG_RUNTIME_DIR")))
+				 (concat (if runtime-dir (concat runtime-dir "/") "~/.")
+                                         "speech-dispatcher/speechd.sock")))))))
             ((eq method 'inet-socket)
              (open-network-stream "speechd" nil host port))
             (t (error "Invalid communication method: `%s'" method)))))