First try at using defadvice