       (notmuch-search-tag '("-unread") beg end)
       (notmuch-search-tag '("-inbox") beg end))))
 
-(defun lorem ()
+(defun --lorem ()
   "Insert a lorem ipsum."
   (interactive)
   (insert "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do "

  (insert "```\n```")
  (goto-char (- (point) 4)))

(defun insert-kbd ()
  "Insert <kbd></kbd> then set point in the middle."
  (interactive)
  (push-mark)
  (insert "<kbd></kbd>")
  (goto-char (- (point) 6)))

(defun pipe-to-pbcopy (text)
  "Execute ../bin/copy.sh on TEXT, which copies it to the Mac OS \
clipboard.  This function is only meant to be assigned to \
'interprogram-cut-function'"

  (setq frame-background-mode 'dark)
  (load-theme 'solarized t))

(defun --fuck-you ()
  "Because it won't work on init with Debian Terminal."
  (interactive)
  (setq solarized-termcolors 256)
  (setq frame-background-mode 'light)
  (load-theme 'solarized t))

(defun --shell-command-replace-region (start end command
                                           &optional output-buffer replace
                                           error-buffer display-error-buffer)
  "Slightly modified version of `shell-command-on-region'.
