From a83556a9d40c0afbbf91ad5d0245881b94da6caf Mon Sep 17 00:00:00 2001
From: ignuki <inaki694@gmail.com>
Date: Sat, 18 Aug 2018 17:26:06 +0200
Subject: [PATCH] Minor changes

---
 init.el        |  9 +++------
 my-modeline.el | 39 +++++++++++++++------------------------
 2 files changed, 18 insertions(+), 30 deletions(-)

diff --git a/init.el b/init.el
index 5cb992f..73ec92e 100644
--- a/init.el
+++ b/init.el
@@ -5,12 +5,6 @@
   (interactive)
   (byte-recompile-directory user-emacs-directory 0))
 
-(defadvice find-file (after find-file-sudo activate)
-  "Find file as root if necessary."
-  (unless (and buffer-file-name
-               (file-writable-p buffer-file-name))
-    (find-alternate-file (concat "/sudo:root@localhost:" buffer-file-name))))
-
 (load "~/.emacs.d/my-packages.el")
 (byte-compile-init-dir)
 (load "~/.emacs.d/my-loadpackages.elc")
@@ -29,6 +23,9 @@
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
+ '(custom-safe-themes
+   (quote
+    ("16dd114a84d0aeccc5ad6fd64752a11ea2e841e3853234f19dc02a7b91f5d661" "f2dd097452b79276ce522df2f8aeb37f6d90f504529616aa46122d549910e46d" "21c6b494da74b10ff573fa96b6850651e321282daa17fc9d6c8fbbee96ade005" default)))
  '(package-selected-packages
    (quote
     (jdee web-mode use-package-chords use-package projectile pkg-info less-css-mode ghc fill-column-indicator evil-magit evil epl diminish dash counsel bind-chord base16-theme async all-the-icons))))
diff --git a/my-modeline.el b/my-modeline.el
index 5e87255..2316a47 100644
--- a/my-modeline.el
+++ b/my-modeline.el
@@ -105,29 +105,25 @@ can be used to add a number of spaces to the front and back of the string."
        `(:background ,(evil-tag-color) :family ,(funcall (car result)))))))
 
 (defun custom-modeline-mode-icon ()
-  (let ((icon (all-the-icons-icon-for-buffer)))
+ (let ((icon (all-the-icons-icon-for-buffer)))
     (if (not (symbolp icon)) ;; This implies it's the major mode
         (format " %s"
                 (propertize
-                 icon
+                 (all-the-icons-icon-for-buffer)
                  'face
-                 `(:height 1.0 :family ,(all-the-icons-icon-family-for-buffer))
+                 `(:family ,(all-the-icons-icon-family-for-buffer))
                  'display '(raise 0.0)))
       (format " %s"
               (propertize
                ""
                'face
-               `(:height 1.0 :family ,(all-the-icons-faicon-family))
+               `(:family ,(all-the-icons-faicon-family))
                'display '(raise 0.0))))))
 
 (defun line-count-line ()
   (let* ((bg (time-tag-bg-color))
          (fg (time-tag-fg-color)))
     (concat
-     ;; (propertize
-     ;;  (all-the-icons-faicon "rebel")
-     ;;  'face
-     ;;  `(:height 0.8 :background ,bg :foreground ,fg) 'display '(raise 0.2))
      (propertize
       (format " %%l/%d "
               (count-lines (point-min) (point-max)))
@@ -135,8 +131,6 @@ can be used to add a number of spaces to the front and back of the string."
 
 (defun powerline-time ()
   (let* ((hour (string-to-number (format-time-string "%I")))
-         ;; (icon (all-the-icons-wicon
-         ;;        (format "time-%s" hour) :height 1.0 :v-adjust 0.0))
          (bg (time-tag-bg-color))
          (fg (time-tag-fg-color)))
     (concat
@@ -144,24 +138,21 @@ can be used to add a number of spaces to the front and back of the string."
       (format-time-string " %H:%M ")
       'face
       `(:height 1.0 :background ,bg :foreground ,fg))
-     ;; (propertize
-     ;;  (format "%s" icon)
-     ;;  'face
-     ;;  `(:height 1.0 :family "Weather Icons" :background ,bg :foreground ,fg)
-     ;;  'display '(raise -0.0))
      (propertize
       "·"
       'face `(:height 1.0 :background ,bg :foreground ,fg)))))
 
-(defvar separator-left
-  (propertize
-   ""
-   'face `(:height 1.1 :foreground "#86261c") 'display '(raise -0.0)))
+(defvar separator-left "")
+(defvar separator-right "")
+;; (defvar separator-left
+;;   (propertize
+;;    ""
+;;    'face `(:height 1.1 :foreground "#86261c") 'display '(raise -0.0)))
 
-(defvar separator-right
-  (propertize
-   ""
-   'face `(:height 1.1 :foreground "#86261c") 'display '(raise -0.0)))
+;; (defvar separator-right
+;;   (propertize
+;;    " "
+;;    'face `(:height 1.1 :foreground "#86261c") 'display '(raise -0.0)))
 
 (setq-default mode-line-format
               (list
@@ -175,7 +166,7 @@ can be used to add a number of spaces to the front and back of the string."
                            (custom-modeline-mode-icon) ;; %m
                            " %b "))
                          ;;center
-                         " "
+                         ""
                          ;; right
                          (format-mode-line
                           (concat