setting cursor-type in init file doesn't set it in *scratch*

[David Reitter]

Shouldnt setting the cursor-type with a (setq cursor-type '(bar .1))  
set the cursor-type for *scratch*, because that is the selected  
buffer at the time?

Instead, when I have the above statement in .emacs or a site-init  
file,  `cursor-type' is magically set back to t or whatever is the  
default for the variable.

That means, `set-default' works as expected for the variable; so does  
adding it to initial-frame-alist.

This is a current vanilla Emacs 22 from CVS, Carbon port.