;;; wcat.el
;;;
;;; Copyright (C) 2003, 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: Use "wget -O-" on URL at point.

;;;###autoload
(defun wcat ()
  "Use \"wget -O-\" on URL at point."
  (interactive)
  (shell-command (format "wget -q -O - %s" (thing-at-point 'url))))

(provide 'wcat)

;;; wcat.el ends here