From a1e4bd5a5a8b698adfe9552ef565bf39dac74a41 Mon Sep 17 00:00:00 2001
From: Christoph Egger <christoph@christoph-egger.org>
Date: Sat, 17 Sep 2016 08:31:27 +0000
Subject: [PATCH] Conditionalize emacs startup snippets

---
 config/general.el    | 16 +++++++++++-----
 config/irony.el      | 26 ++++++++++++++------------
 config/whitespace.el |  6 ++++--
 config/yas.el        | 10 +++++-----
 4 files changed, 34 insertions(+), 24 deletions(-)

diff --git a/config/general.el b/config/general.el
index c8c406e..76eba1a 100644
--- a/config/general.el
+++ b/config/general.el
@@ -1,6 +1,7 @@
 (message "General emacs setup")
 
-(tool-bar-mode -1)
+(if window-system
+    (tool-bar-mode -1))
 (setq inhibit-startup-message t)
 
 ;; Indentation
@@ -17,9 +18,11 @@
 (require 'uniquify)
 (setq uniquify-buffer-name-style 'post-forward)
 
-(require 'auto-complete)
+(if (locate-library "auto-complete")
+    (require 'auto-complete))
 
-(require 'magit)
+(if (locate-library "auto-complete")
+    (require 'magit))
 
 ;; Ido mode
 (require 'ido)
@@ -56,5 +59,8 @@
 (global-set-key (kbd "<XF86Paste>") 'paste-x-selection)
 (global-set-key (kbd "C-S-<insert>") 'paste-x-selection)
 
-(require 'dired-narrow)
-(define-key dired-mode-map "/" 'dired-narrow)
+
+(if (locate-library "dired-narrow")
+    (progn
+      (require 'dired-narrow)
+      (define-key dired-mode-map "/" 'dired-narrow)))
diff --git a/config/irony.el b/config/irony.el
index 95b6c48..c00ab45 100644
--- a/config/irony.el
+++ b/config/irony.el
@@ -1,13 +1,15 @@
-(require 'irony)
-(add-hook 'c++-mode-hook 'irony-mode)
-(add-hook 'c-mode-hook 'irony-mode)
-(add-hook 'objc-mode-hook 'irony-mode)
+(if (locate-library "irony")
+    (progn
+      (require 'irony)
+      (add-hook 'c++-mode-hook 'irony-mode)
+      (add-hook 'c-mode-hook 'irony-mode)
+      (add-hook 'objc-mode-hook 'irony-mode)
 
-;; replace the `completion-at-point' and `complete-symbol' bindings in
-;; irony-mode's buffers by irony-mode's function
-(defun my-irony-mode-hook ()
-  (define-key irony-mode-map [remap completion-at-point]
-    'irony-completion-at-point-async)
-  (define-key irony-mode-map [remap complete-symbol]
-    'irony-completion-at-point-async))
-(add-hook 'irony-mode-hook 'my-irony-mode-hook)
+      ;; replace the `completion-at-point' and `complete-symbol' bindings in
+      ;; irony-mode's buffers by irony-mode's function
+      (defun my-irony-mode-hook ()
+        (define-key irony-mode-map [remap completion-at-point]
+          'irony-completion-at-point-async)
+        (define-key irony-mode-map [remap complete-symbol]
+          'irony-completion-at-point-async))
+      (add-hook 'irony-mode-hook 'my-irony-mode-hook)))
diff --git a/config/whitespace.el b/config/whitespace.el
index 1c1ad0c..3009628 100644
--- a/config/whitespace.el
+++ b/config/whitespace.el
@@ -1,3 +1,5 @@
 ;; Show whitespaces by default
-(require 'show-wspace)
-(global-font-lock-mode 1)
+(if (locate-library "show-wspace")
+    (progn
+      (require 'show-wspace)
+      (global-font-lock-mode 1)))
diff --git a/config/yas.el b/config/yas.el
index 2eb1e1f..78bb421 100644
--- a/config/yas.el
+++ b/config/yas.el
@@ -1,6 +1,6 @@
-(require 'yasnippet)
-
-(setq yas-snippet-dirs '("~/proj/snippets"))
-
-(yas-global-mode 1)
+(if (locate-library "yasnippet")
+    (progn
+      (require 'yasnippet)
+      (setq yas-snippet-dirs '("~/proj/snippets"))
+      (yas-global-mode 1)))
 
-- 
2.39.5