User Portlet

I'm trying to work through and recreate a tutorial (attached, attribution in file), but it appears that the final evaluation (a Manipulate plot) no longer works. Can someone help me figure out why this is? I've attached both the Mathematica notebook...