       "Handle the start of a terminal paste operation."
       (interactive)
       (let* ((pasted-text (xterm--pasted-text))
-            (interprogram-paste-function (lambda () pasted-text)))
+             (interprogram-paste-function (lambda () pasted-text)))
         (call-interactively #'yank))))
 
   (defun insert-date (arg)

  (with-eval-after-load 'evil-common
    (defadvice evil-paste-pop (around evil-browse-kill-ring-maybe (arg) activate)
      "If last action was not a yank, run `browse-kill-ring' instead."
      ; evil-paste-pop has an (interactive "*p") form which does not allow
      ; it to run in a read-only buffer.  We want browse-kill-ring to
      ; be allowed to run in a read only buffer, so we change the
      ; interactive form here.  In that case, we need to
      ; barf-if-buffer-read-only if we're going to call evil-paste-pop with
      ; ad-do-it
      (interactive "p")
      (if (not (memq last-command '(yank evil-paste-before evil-paste-pop evil-paste-after evil-visual-paste)))
          (helm-show-kill-ring)

  When called from Lisp, this command enables the mode if the
  argument is omitted or nil, and toggles the mode if the argument
  is 'toggle."
    nil " X" nil
    :global t
    (cond
     (xclip-mode
