GeneralScrollPane is not scolling.

spreadsheet.st

lx := ZnClient new.

json_data := Array with:
	(NeoJSONReader fromString: (lx get: 'https://api.github.com/users/cmoore')).

sheet := SpreadsheetGridMorph new
			hResizing: #spaceFill;
			vResizing: #spaceFill;
			yourself.

json_data
	withIndexCollect: [ :dict :yindex | 
		dict keys
			withIndexCollect: [ :string :xindex | 
				sheet
					cellStringAt: xindex @ yindex put: (dict at: string) asString;
					cellSpacing: 31 + string size ] ].

scrollpane := GeneralScrollPane new.
	
pane := PanelMorph new
	fillStyle: Color transparent;
	hResizing: #spaceFill;
	vResizing: #spaceFill;
		changeTableLayout;
		layoutInset: 2;
		cellInset: 2;
		yourself.
	
scrollpane scrollTarget: pane.

pane addMorph: sheet.
scrollpane scrollTarget: pane.
scrollpane changeScrollerTableLayout.
	
scrollpane openInWindow.