anchor.diff:  	       (create-card-in-hand "#hand" res))
   	     (define-ajax table/stack/reorder (stack card-order))
   
  -	     ;;; Note-related actions
  -	     ;; TODO table/note/attach
  -
   	     ;;; Card-related actions
   	     (define-ajax table/card/flip (card))
   	     (define-ajax table/card/pick-up (card)
  
positive.code: 	     (define-ajax table/remove (thing))
  	     (define-ajax table/move (thing x y z rot))
  	     ;; TODO table/take
  
  	     ;;; Stack-related actions
  	     (define-ajax table/stack/play-top-card (stack face x y z rot))
  
negative.code: 				  (when (and (= (@ ev stack) ($ "#peek-window .stack-id" (text)))
  					     (not (= (@ ev player) (@ *session* id))))
  				    (clear-peek-window))
  				  ($incf (+ "#" (@ ev player) " .hand-size"))
  				  (change-stack-count (@ ev stack) -1))
  				 (reordered
  				  (when (and (= (@ ev stack) ($ "#peek-window .stack-id" (text)))
  