From b2d7367c8f97bbb96211a161aa73c203914e6cf1 Mon Sep 17 00:00:00 2001
From: Roey Darwish Dror <roey.ghost@gmail.com>
Date: Thu, 31 May 2018 16:17:28 +0300
Subject: [PATCH] Emacs

---
 src/main.rs | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/src/main.rs b/src/main.rs
index a5b0763b..6bcfde7c 100644
--- a/src/main.rs
+++ b/src/main.rs
@@ -48,6 +48,11 @@ impl Chain for ExitStatus {
     }
 }
 
+const EMACS_UPGRADE: &str = "(progn (let ((package-menu-async nil))
+         (package-list-packages))
+       (package-menu-mark-upgrades)
+       (package-menu-execute 'noquery))";
+
 fn home_path(p: &str) -> PathBuf {
     let mut path = home_dir().unwrap();
     path.push(p);
@@ -119,6 +124,18 @@ fn run() -> Result<()> {
             .wait()?;
     }
 
+    if let Ok(emacs) = which("emacs") {
+        terminal.print_separator("Emacs");
+        if home_path(".emacs.d").exists() {
+            Command::new(&emacs)
+                .arg("--batch")
+                .arg("--eval")
+                .arg(EMACS_UPGRADE)
+                .spawn()?
+                .wait()?;
+        }
+    }
+
     if cfg!(target_os = "linux") {
         let sudo = which("sudo");