anchor.diff:  ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
   ;;; Boston, MA  02111-1307  USA.
   
  -;;; $Id: panes.lisp,v 1.178 2007-01-23 07:51:10 ahefner Exp $
  +;;; $Id: panes.lisp,v 1.179 2007-02-05 03:02:59 ahefner Exp $
   
   (in-package :clim-internals)
   
  
positive.code: ;;   call change-space-requirements on parent pane
  ;;   call note-space-requirements-changed
  ;;
  ;; This is splitted into :before, primary and :after method to allow
  ;; for easy overriding of change-space-requirements without needing to
  ;; know the details of the space requirement cache and the
  ;; note-space-requirements-changed notifications.
  ;;
  
negative.code: ; timer-event convenience
  
  (defmethod schedule-timer-event ((pane pane) token delay)
    (warn "Are you sure you want to use schedule-timer-event? It probably doesn't work.")
    (schedule-event pane (make-instance 'timer-event :token token :sheet pane) delay))
  
  