🚀 go-pugleaf

I have the following lines in the epoch section of my .emacs file per the
FAQ, but they don't appear to work:

      (defun set-foreground (newfg)
	"Set current foreground color to NEWFG."
	(interactive "sForeground color: ")
	(set-style-foreground buffer-style newfg)
	(redraw-display))

      (defun set-background (newbg)
	"Set current background color to NEWBG."
	(interactive "sBackground color: ")
	(set-style-background buffer-style newbg)
	(redraw-display))

What did I do wrong??  When I run 'set-foreground' or 'set-background', it 
prompts me for a color.  Then I type in a color name (e.g. "red").  Epoch
spits out this in the minibuffer:

	Wrong type argument: stylep, nil

I'm not an elisp weenie, so this is Greek to me.  Can anyone suggest how to
fix my code so that I can interactively specify foreground and background
colors??

Thanks in advance.

-- Mike
___________________________________________________________________________
Michael S. Meyer                             meyerm@hp700.trg.saic.com
Technology Research Group                               619-546-6097  voice
Science Applications International Corporation          619-546-6777    fax
San Diego, CA
___________________________________________________________________________