Don't report state non-changes

If the state doesn't actually change, don't report it. This mostly
applies to some rare cases where the listeners could be called for
Ended->Ended.

experiments/democode/perlrunner.html

@@ -38,7 +38,7 @@ var knownClients = [];
 var currentClient; // which client we're running Perl for, also keeps state
 
 Perl.addStateChangeListener(function (from,to) {
-	if (from==to) return;
+	if (from==to) return; // won't be needed as of v0.09-beta
 	for(var i=0; i<knownClients.length; i++)
 		knownClients[i].postMessage({ perlRunnerState: Perl.state },'*');
 	if (to=="Ended") {

web/webperl.js

@@ -130,6 +130,7 @@ Perl._saveAndRun = function (script) {
 };
 
 Perl.changeState = function (newState) {
+	if (Perl.state==newState) return;
 	var oldState = Perl.state;
 	Perl.state = newState;
 	if (Perl.stateChanged) {