一部間違えました。
(defadvice bar (before ad-bar activate)
(moo))
↓
(defadvice bar (after ad-bar activate)
(setq ad-return-value (moo)))