>(eval `(define ,fully-qualified-to ,fully-qualified-to)) should be (eval `(define ,fully-qualified-to ,fully-qualified-from)) and >(eval `(define-macro (,fully-qualified-to . args) (append >',fully-qualified-to args))) should be (eval `(define-macro (,fully-qualified-to . args) (cons ',fully-qualified-from args))) Christian.