Today's Smalltalk Daily looks at using the client authentication to Google we built to retrieve an Atom feed of calendar events. The code I'm demonstrating is in the public store repository under the name GCal-Example - the usage in the screencast is below. To skip to the video, click here.
"get the request token - cl is the calendar service" gAuth := AuthRequest requestTokenFor: 'cl' user: username password: password clientName: 'Cincom-VisualWorks-771'. "get the response as XML" request := EventRangeRequest from: (Timestamp readFrom: '09/01/10 0:00:00' readStream) to: (Timestamp readFrom: '10/01/10 0:00:00' readStream). response := ServiceRequest makeRequestWith: gAuth requestPrepObject: request. xml := response contents. "save the results as a file for addition to any RSS/Atom aware tool" file := 'calFeed.xml' asFilename writeStream. file nextPutAll: xml. file close.To watch now, use the viewer below:
You can also watch it on YouTube: