   :commands (elfeed elfeed-update):init
   (progn
     (run-at-time nil
-		 (* 3 60 60)
-		 (lambda ()
-		   (elfeed-update)
-		   (elfeed-db-save))))
+                 (* 3 60 60)
+                 (lambda ()
+                   (elfeed-update)
+                   (elfeed-db-save))))
   :config (progn
-	    (evil-leader/set-key "a e" 'elfeed)
-	    (setq browse-url-generic-program "open")
-	    (setq browse-url-generic-args (list "-g"))
-	    (evil-define-key 'normal
-	      elfeed-search-mode-map
-	      (kbd "o")
-	      (lambda (&optional alternate)
-		(interactive)
-		(elfeed-search-browse-url t)))
-	    (evil-define-key 'normal
-	      elfeed-search-mode-map
-	      (kbd "O")
-	      'elfeed-search-browse-url)
-	    (evil-define-key 'visual
-	      elfeed-search-mode-map
-	      (kbd "o")
-	      'elfeed-search-browse-url)
-	    (evil-define-key 'normal
-	      elfeed-search-mode-map
-	      (kbd "d")
-	      'meain/elfeed-search-filter)
-	    (evil-define-key 'normal
-	      elfeed-search-mode-map
-	      (kbd "D")
-	      (lambda ()
-		(interactive)
-		(setq elfeed-search-filter "@2-months-ago +unread")
-		(elfeed-search-update :force)))
-	    (evil-define-key 'normal
-	      elfeed-search-mode-map
-	      (kbd "q")
-	      'elfeed-db-unload)
-	    (defun meain/elfeed-search-filter ()
-	      (interactive)
-	      (ivy-read "Apply tag: "
-			(elfeed-db-get-all-tags)
-			:action (lambda (x)
-				  (setq elfeed-search-filter (concatenate 'string "@2-months-ago +unread +"
-									  x))
-				  (elfeed-search-update :force))))
-	    (setq-default elfeed-search-filter "@2-months-ago +unread ")
-	    (setq elfeed-use-curl t)
-	    (setq elfeed-curl-max-connections 10)
-	    (setq elfeed-db-directory "~/.config/emacs/elfeed/")
-	    (setq elfeed-enclosure-default-dir "~/Downloads/")
-	    (setq elfeed-show-entry-switch #'meain/elfeed-display-buffer)
-	    (add-to-list 'display-buffer-alist
-			 '((lambda (bufname _)
-			     (with-current-buffer bufname
-			       (equal major-mode 'elfeed-show-mode)))
-			   (display-buffer-reuse-window display-buffer-at-bottom)
-			   (reusable-frames . visible)
-			   (window-height . 0.7)))
-	    (defun meain/elfeed-search-print (entry)
-	      "Print ENTRY to the buffer."
-	      (let* ((feed-width 25)
-		     (tags-width 35)
-		     (title (or (elfeed-meta entry :title)
-				(elfeed-entry-title entry)
-				""))
-		     (title-faces (elfeed-search--faces (elfeed-entry-tags entry)))
-		     (feed (elfeed-entry-feed entry))
-		     (feed-title (when feed
-				   (or (elfeed-meta feed :title)
-				       (elfeed-feed-title feed))))
-		     (tags (mapcar #'symbol-name
-				   (elfeed-entry-tags entry)))
-		     (tags-str (concat " ("
-				       (mapconcat 'identity tags ",")
-				       ")"))
-		     (title-width (- (window-width)
-				     feed-width
-				     tags-width
-				     4))
-		     (title-column (elfeed-format-column title
-							 (elfeed-clamp elfeed-search-title-min-width
-								       title-width elfeed-search-title-max-width)
-							 :left))
-		     (tag-column (elfeed-format-column tags-str
-						       (elfeed-clamp (length tags-str)
-								     tags-width
-								     tags-width)
-						       :left))
-		     (feed-column (elfeed-format-column feed-title
-							(elfeed-clamp feed-width feed-width feed-width)
-							:left)))
-		(insert (propertize feed-column 'face 'elfeed-search-feed-face)
-			" ")
-		(insert (propertize title 'face title-faces 'kbd-help
-				    title))
-		(insert (propertize tag-column 'face 'elfeed-search-tag-face)
-			" ")))
-	    (setq elfeed-search-print-entry-function 'meain/elfeed-search-print)
-	    (defun meain/elfeed-display-buffer (buf &optional act)
-	      (pop-to-buffer buf)
-	      (set-window-text-height (get-buffer-window)
-				      (round (* 0.7
-						(frame-height)))
-				      (previous-window-any-frame)))
-	    (defun meain/elfeed-enclosure-download (base-dir extension)
-	      "Download podcast to `BASE-DIR' with proper heirary using feed and title using `EXTENSION'"
-	      (start-process "*elfeed-enclosure-download*"
-			     "*elfeed-enclosure-download*"
-			     "downloader"
-			     (elt (car (elfeed-entry-enclosures elfeed-show-entry))
-				  0)
-			     (format "%s/%s/%s%s"
-				     base-dir
-				     (elfeed-feed-title (elfeed-entry-feed elfeed-show-entry))
-				     (elfeed-entry-title elfeed-show-entry)
-				     extension))
-	      (message "Download started for %s - %s"
-		       (elfeed-feed-title (elfeed-entry-feed elfeed-show-entry))
-		       (elfeed-entry-title elfeed-show-entry)))
-	    (defun meain/elfeed-podcast-download-to-local ()
-	      "Download current feed(podcast) to usual dir."
-	      (interactive)
-	      (meain/elfeed-enclosure-download "/Users/meain/Desktop/newsboat/podcasts"
-					       ".mp3"))
-	    (load-file "~/.config/emacs/elfeed-feeds.el")))
+            (evil-leader/set-key "a e" 'elfeed)
+            (setq browse-url-generic-program "open")
+            (setq browse-url-generic-args (list "-g"))
+            (evil-define-key 'normal
+              elfeed-search-mode-map
+              (kbd "o")
+              (lambda (&optional alternate)
+                (interactive)
+                (elfeed-search-browse-url t)))
+            (evil-define-key 'normal
+              elfeed-search-mode-map
+              (kbd "O")
+              'elfeed-search-browse-url)
+            (evil-define-key 'visual
+              elfeed-search-mode-map
+              (kbd "o")
+              'elfeed-search-browse-url)
+            (evil-define-key 'normal
+              elfeed-search-mode-map
+              (kbd "d")
+              'meain/elfeed-search-filter)
+            (evil-define-key 'normal
+              elfeed-search-mode-map
+              (kbd "D")
+              (lambda ()
+                (interactive)
+                (setq elfeed-search-filter "@2-months-ago +unread")
+                (elfeed-search-update :force)))
+            (evil-define-key 'normal
+              elfeed-search-mode-map
+              (kbd "q")
+              'elfeed-db-unload)
+            (defun meain/elfeed-search-filter ()
+              (interactive)
+              (ivy-read "Apply tag: "
+                        (elfeed-db-get-all-tags)
+                        :action (lambda (x)
+                                  (setq elfeed-search-filter (concatenate 'string "@2-months-ago +unread +"
+                                                                          x))
+                                  (elfeed-search-update :force))))
+            (setq-default elfeed-search-filter "@2-months-ago +unread ")
+            (setq elfeed-use-curl t)
+            (setq elfeed-curl-max-connections 10)
+            (setq elfeed-db-directory "~/.config/emacs/elfeed/")
+            (setq elfeed-enclosure-default-dir "~/Downloads/")
+            (setq elfeed-show-entry-switch #'meain/elfeed-display-buffer)
+            (add-to-list 'display-buffer-alist
+                         '((lambda (bufname _)
+                             (with-current-buffer bufname
+                               (equal major-mode 'elfeed-show-mode)))
+                           (display-buffer-reuse-window display-buffer-at-bottom)
+                           (reusable-frames . visible)
+                           (window-height . 0.7)))
+            (defun meain/elfeed-search-print (entry)
+              "Print ENTRY to the buffer."
+              (let* ((feed-width 25)
+                     (tags-width 35)
+                     (title (or (elfeed-meta entry :title)
+                                (elfeed-entry-title entry)
+                                ""))
+                     (title-faces (elfeed-search--faces (elfeed-entry-tags entry)))
+                     (feed (elfeed-entry-feed entry))
+                     (feed-title (when feed
+                                   (or (elfeed-meta feed :title)
+                                       (elfeed-feed-title feed))))
+                     (tags (mapcar #'symbol-name
+                                   (elfeed-entry-tags entry)))
+                     (tags-str (concat " ("
+                                       (mapconcat 'identity tags ",")
+                                       ")"))
+                     (title-width (- (window-width)
+                                     feed-width
+                                     tags-width
+                                     4))
+                     (title-column (elfeed-format-column title
+                                                         (elfeed-clamp elfeed-search-title-min-width
+                                                                       title-width elfeed-search-title-max-width)
+                                                         :left))
+                     (tag-column (elfeed-format-column tags-str
+                                                       (elfeed-clamp (length tags-str)
+                                                                     tags-width
+                                                                     tags-width)
+                                                       :left))
+                     (feed-column (elfeed-format-column feed-title
+                                                        (elfeed-clamp feed-width feed-width feed-width)
+                                                        :left)))
+                (insert (propertize feed-column 'face 'elfeed-search-feed-face)
+                        " ")
+                (insert (propertize title 'face title-faces 'kbd-help
+                                    title))
+                (insert (propertize tag-column 'face 'elfeed-search-tag-face)
+                        " ")))
+            (setq elfeed-search-print-entry-function 'meain/elfeed-search-print)
+            (defun meain/elfeed-display-buffer (buf &optional act)
+              (pop-to-buffer buf)
+              (set-window-text-height (get-buffer-window)
+                                      (round (* 0.7
+                                                (frame-height)))
+                                      (previous-window-any-frame)))
+            (defun meain/elfeed-enclosure-download (base-dir extension)
+              "Download podcast to `BASE-DIR' with proper heirary using feed and title using `EXTENSION'"
+              (start-process "*elfeed-enclosure-download*"
+                             "*elfeed-enclosure-download*"
+                             "downloader"
+                             (elt (car (elfeed-entry-enclosures elfeed-show-entry))
+                                  0)
+                             (format "%s/%s/%s%s"
+                                     base-dir
+                                     (elfeed-feed-title (elfeed-entry-feed elfeed-show-entry))
+                                     (elfeed-entry-title elfeed-show-entry)
+                                     extension))
+              (message "Download started for %s - %s"
+                       (elfeed-feed-title (elfeed-entry-feed elfeed-show-entry))
+                       (elfeed-entry-title elfeed-show-entry)))
+            (defun meain/elfeed-podcast-download-to-local ()
+              "Download current feed(podcast) to usual dir."
+              (interactive)
+              (meain/elfeed-enclosure-download "/Users/meain/Desktop/newsboat/podcasts"
+                                               ".mp3"))
+            (load-file "~/.config/emacs/elfeed-feeds.el")))
 
 ;; command log
 (use-package command-log-mode
   :commands global-command-log-mode
   :ensure t
   :init (progn
-	  (defun meain/command-log-start ()
-	    "Enable command-log-mode and open command-log buffer."
-	    (interactive)
-	    (global-command-log-mode)
-	    (clm/open-command-log-buffer))))
+          (defun meain/command-log-start ()
+            "Enable command-log-mode and open command-log buffer."
+            (interactive)
+            (global-command-log-mode)
+            (clm/open-command-log-buffer))))
 
 ;; Beacon mode
 (use-package beacon

;; Set up package & melpa
(require 'package)
(add-to-list 'package-archives
	     '("melpa" . "http://melpa.org/packages/")
	     t)
(package-initialize)

;; Set up use-package

  "Set font after selection using ivy."
  (interactive)
  (ivy-read "Choose font:"
            (font-family-list)
            :action (lambda (x)
                      (set-frame-font x))))

;; Bell: audio -> visual
(setq visible-bell nil)
(setq ring-bell-function (lambda ()
                           (unless (memq this-command
                                         '(isearch-abort abort-recursive-edit exit-minibuffer
                                                         keyboard-quit))
                             (invert-face 'mode-line)
                             (run-with-timer 0.1 nil 'invert-face 'mode-line))))

;; emoji support
(defun meain/set-emoji-font ()
  "Setup proper emoji font."
  (let ((font (cond
               ((string-equal system-type "darwin") "Apple Color Emoji 10")
               ((string-equal system-type "gnu/linux") "Symbola 10"))))
    (set-fontset-font t 'unicode font nil 'prepend)))
(defun meain/set-emoji-font-in-frame (frame)
  "Hook to be called for setting emoji font in FRAME."
