;;; -*- Mode:LISP; Package:USER -*-
(defun foozle ()
  (foozle-2))

(compiler:make-obsolete foozle "because it sucks")