[Gnash-commit] [SCM] Gnash branch, master, updated. 1c18461ab14e3962bfd6b46a64326871d2b0ac71

[Sandro Santilli]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnash".

The branch, master has been updated
       via  1c18461ab14e3962bfd6b46a64326871d2b0ac71 (commit)
       via  f7d99ea64732025c551793a78400a8ca244cb976 (commit)
      from  4a3245ce455b0aca9e17ffb810af6945b3d4b898 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
http://git.savannah.gnu.org/cgit//commit/?id=1c18461ab14e3962bfd6b46a64326871d2b0ac71


commit 1c18461ab14e3962bfd6b46a64326871d2b0ac71
Author: Sandro Santilli <address@hidden>
Date:   Mon Oct 11 22:20:46 2010 +0200

    Check return from close(socket) in perl XmlSocket server

diff --git a/testsuite/XmlSocketServer.pl b/testsuite/XmlSocketServer.pl
index a4f8546..363668e 100644
--- a/testsuite/XmlSocketServer.pl
+++ b/testsuite/XmlSocketServer.pl
@@ -46,13 +46,12 @@ while (@S = $O->can_read) {
 
             if ($i =~ m/closeNow/) {
                 print("XmlSocketServer: closing...\n") if $verbose;
-                close($m);
-                break; # Time::HiRes::sleep(1); 
+                close($C) || die "Could not close reading Socket";
             }
-
         }
     }
 }
 
+close($m) || die "Could not close server Socket";
 print("XmlSocketServer: salut!\n") if $verbose;
 

http://git.savannah.gnu.org/cgit//commit/?id=f7d99ea64732025c551793a78400a8ca244cb976


commit f7d99ea64732025c551793a78400a8ca244cb976
Author: Sandro Santilli <address@hidden>
Date:   Mon Oct 11 15:00:49 2010 +0200

    XmlSocketServer: do not write to socket after close

diff --git a/testsuite/XmlSocketServer.pl b/testsuite/XmlSocketServer.pl
index d851a45..a4f8546 100644
--- a/testsuite/XmlSocketServer.pl
+++ b/testsuite/XmlSocketServer.pl
@@ -23,12 +23,6 @@ while (@S = $O->can_read) {
             # Log message received:
             print "XmlSocketServer: received \"$i\"\n" if $verbose;
             
-            if ($i =~ m/closeNow/) {
-                print("Closing...\n") if $verbose;
-                close($m);
-                Time::HiRes::sleep(1);
-            }
-
             if ($R==0) {
                 $T=syswrite($_, "\n", 16000);
                 if ($T==undef) {
@@ -49,7 +43,16 @@ while (@S = $O->can_read) {
                     $T=syswrite($C, $i, 16000);
                 }
             }
+
+            if ($i =~ m/closeNow/) {
+                print("XmlSocketServer: closing...\n") if $verbose;
+                close($m);
+                break; # Time::HiRes::sleep(1); 
+            }
+
         }
     }
 }
 
+print("XmlSocketServer: salut!\n") if $verbose;
+

-----------------------------------------------------------------------

Summary of changes:
 testsuite/XmlSocketServer.pl |   14 ++++++++------
 1 files changed, 8 insertions(+), 6 deletions(-)


hooks/post-receive
-- 
Gnash