;;; brb.el
;;;
;;; Copyright (C) 1997, 1998, 1999, 2004, 2007, 2008 Thien-Thi Nguyen
;;;
;;; This file is part of ttn's personal elisp library, released under
;;; the terms of the GNU General Public License as published by the
;;; Free Software Foundation; either version 3, or (at your option) any
;;; later version.  There is NO WARRANTY.  See file COPYING for details.

;;; Description: "Be right back" to terminal.  Uses alternative notification.

(require 'yo)

;;;###autoload
(defun brb (&optional explanation)
  "Don't use my cnxn, man!"
  (interactive "sExplanation: ")
  (save-window-excursion
    (delete-other-windows)
    (enlarge-window (- (/ (frame-height) 2)))
    (yo! (format "%s(left at %s)"
                 (if (string= "" explanation)
                     ""
                   (concat explanation " "))
                 (current-time-string))
         'bounce)))

(provide 'brb)

;;; brb.el ends here