Permalink
Browse files

Remove $Id$ and $Revision$ tags. No significant code changed despite

most of the distribution being touched.
  • Loading branch information...
1 parent 7398fc8 commit 59590043b63d0a681b593ea46730d550d2f36959 @rcaputo committed Aug 15, 2009
Showing with 58 additions and 239 deletions.
  1. +2 −2 README
  2. +0 −1 docs/Makefile
  3. +0 −1 docs/out-out.perl
  4. +0 −1 examples/create.perl
  5. +0 −1 examples/fakelogin.perl
  6. +0 −1 examples/forkbomb.perl
  7. +0 −1 examples/names.perl
  8. +0 −1 examples/objmaps.perl
  9. +0 −1 examples/objsessions.perl
  10. +0 −1 examples/packagesessions.perl
  11. +0 −1 examples/queue.perl
  12. +0 −1 examples/selects.perl
  13. +0 −1 examples/sessions.perl
  14. +0 −1 examples/signals.perl
  15. +0 −1 examples/tcp_watermarks.perl
  16. +0 −1 examples/thrash.perl
  17. +0 −1 examples/watermarks.perl
  18. +0 −1 examples/wheels2.perl
  19. +1 −3 lib/POE.pm
  20. +2 −3 lib/POE/Component.pm
  21. +1 −3 lib/POE/Component/Client/TCP.pm
  22. +1 −3 lib/POE/Component/Server/TCP.pm
  23. +1 −3 lib/POE/Driver.pm
  24. +1 −3 lib/POE/Driver/SysRW.pm
  25. +1 −3 lib/POE/Filter.pm
  26. +1 −3 lib/POE/Filter/Block.pm
  27. +1 −1 lib/POE/Filter/Grep.pm
  28. +1 −3 lib/POE/Filter/HTTPD.pm
  29. +1 −3 lib/POE/Filter/Line.pm
  30. +1 −1 lib/POE/Filter/Map.pm
  31. +1 −1 lib/POE/Filter/RecordBlock.pm
  32. +1 −3 lib/POE/Filter/Reference.pm
  33. +1 −1 lib/POE/Filter/Stackable.pm
  34. +1 −3 lib/POE/Filter/Stream.pm
  35. +1 −3 lib/POE/Kernel.pm
  36. +0 −2 lib/POE/Loader.pm
  37. +2 −4 lib/POE/Loop.pm
  38. +1 −3 lib/POE/Loop/Event.pm
  39. +1 −3 lib/POE/Loop/Gtk.pm
  40. +1 −3 lib/POE/Loop/IO_Poll.pm
  41. +1 −3 lib/POE/Loop/PerlSignals.pm
  42. +1 −3 lib/POE/Loop/Select.pm
  43. +1 −3 lib/POE/Loop/Tk.pm
  44. +1 −3 lib/POE/Loop/TkActiveState.pm
  45. +1 −3 lib/POE/Loop/TkCommon.pm
  46. +1 −3 lib/POE/NFA.pm
  47. +1 −3 lib/POE/Pipe.pm
  48. +1 −3 lib/POE/Pipe/OneWay.pm
  49. +1 −3 lib/POE/Pipe/TwoWay.pm
  50. +1 −3 lib/POE/Queue.pm
  51. +2 −3 lib/POE/Queue/Array.pm
  52. +1 −3 lib/POE/Resource.pm
  53. +1 −3 lib/POE/Resource/Aliases.pm
  54. +1 −3 lib/POE/Resource/Events.pm
  55. +1 −3 lib/POE/Resource/Extrefs.pm
  56. +1 −3 lib/POE/Resource/FileHandles.pm
  57. +1 −3 lib/POE/Resource/SIDs.pm
  58. +1 −3 lib/POE/Resource/Sessions.pm
  59. +1 −3 lib/POE/Resource/Signals.pm
  60. +1 −3 lib/POE/Resource/Statistics.pm
  61. +1 −1 lib/POE/Resources.pm
  62. +1 −3 lib/POE/Session.pm
  63. +1 −3 lib/POE/Wheel.pm
  64. +1 −1 lib/POE/Wheel/Curses.pm
  65. +1 −3 lib/POE/Wheel/FollowTail.pm
  66. +1 −3 lib/POE/Wheel/ListenAccept.pm
  67. +1 −3 lib/POE/Wheel/ReadLine.pm
  68. +1 −3 lib/POE/Wheel/ReadWrite.pm
  69. +1 −3 lib/POE/Wheel/Run.pm
  70. +1 −3 lib/POE/Wheel/SocketFactory.pm
  71. +0 −5 mylib/Devel/Null.pm
  72. +0 −1 mylib/Makefile-5004.pm
  73. +0 −1 mylib/Makefile-5005.pm
  74. +0 −4 mylib/MyOtherFreezer.pm
  75. +0 −1 mylib/PoeBuildInfo.pm
  76. +0 −1 mylib/coverage.perl
  77. +0 −1 mylib/cpan-test.perl
  78. +0 −1 mylib/gen-meta.perl
  79. +0 −2 mylib/gen-tests.perl
  80. +0 −1 mylib/svn-log.perl
  81. +0 −1 t/10_units/01_pod/01_pod.t
  82. +0 −1 t/10_units/01_pod/02_pod_coverage.t
  83. +0 −1 t/10_units/03_base/01_poe.t
  84. +0 −1 t/10_units/03_base/03_component.t
  85. +0 −1 t/10_units/03_base/06_loop.t
  86. +0 −1 t/10_units/03_base/08_resource.t
  87. +0 −1 t/10_units/03_base/11_assert_usage.t
  88. +0 −1 t/10_units/03_base/12_assert_retval.t
  89. +0 −1 t/10_units/03_base/13_assert_data.t
  90. +0 −1 t/10_units/03_base/16_explicit_loop.t
  91. +0 −1 t/10_units/03_base/17_explicit_loop_fail.t
  92. +0 −1 t/10_units/05_filters/01_block.t
  93. +0 −1 t/10_units/05_filters/02_grep.t
  94. +0 −1 t/10_units/05_filters/03_http.t
  95. +0 −1 t/10_units/05_filters/04_line.t
  96. +0 −1 t/10_units/05_filters/05_map.t
  97. +0 −1 t/10_units/05_filters/07_reference.t
  98. +0 −1 t/10_units/05_filters/08_stream.t
  99. +0 −1 t/10_units/05_filters/50_stackable.t
  100. +0 −1 t/10_units/05_filters/99_filterchange.t
  101. +0 −1 t/10_units/06_queues/01_array.t
  102. +0 −1 t/10_units/07_exceptions/01_normal.t
  103. +1 −3 t/10_units/07_exceptions/02_turn_off.t
  104. +1 −3 t/10_units/07_exceptions/03_not_handled.t
  105. +0 −2 t/20_resources/00_base/aliases.pm
  106. +0 −1 t/20_resources/00_base/caller_state.pm
  107. +0 −2 t/20_resources/00_base/events.pm
  108. +0 −2 t/20_resources/00_base/extrefs.pm
  109. +0 −1 t/20_resources/00_base/extrefs_gc.pm
  110. +0 −2 t/20_resources/00_base/filehandles.pm
  111. +0 −2 t/20_resources/00_base/sessions.pm
  112. +0 −2 t/20_resources/00_base/sids.pm
  113. +0 −2 t/20_resources/00_base/signals.pm
  114. +0 −1 t/90_regression/agaran-filter-httpd.t
  115. +0 −1 t/90_regression/averell-callback-ret.t
  116. +0 −1 t/90_regression/broeren-win32-nbio.t
  117. +0 −1 t/90_regression/cfedde-filter-httpd.t
  118. +0 −1 t/90_regression/neyuki_detach.t
  119. +0 −1 t/90_regression/rt14444-arg1.t
  120. +0 −1 t/90_regression/rt1648-tied-stderr.t
  121. +0 −1 t/90_regression/rt19908-merlyn-stop.t
  122. +0 −1 t/90_regression/rt23181-sigchld-rc.t
  123. +0 −1 t/90_regression/steinert-passed-wheel.t
  124. +0 −1 t/90_regression/suzman_windows.t
  125. +0 −1 t/90_regression/ton-stop-corruption.t
  126. +0 −1 t/90_regression/whelan-dieprop.t
  127. +0 −1 t/90_regression/whjackson-followtail.t
View
4 README
@@ -1,4 +1,4 @@
-$Id$
+Version 1.007
--------------------
Detailed Information
@@ -56,7 +56,7 @@ POE's tests cover a significant portion of the distribution. A
thumbnail sketch of POE's test coverage is available, but do not use
it as an accurate gauge of quality.
- http://poe.perl.org/?POE%27s_test_coverage_report
+ http://poe.perl.org/?POE's_test_coverage_report
-----------
What POE Is
View
@@ -1,6 +1,5 @@
#
## Build POD docs from emacs outlines.
-## $Id$
all: ../POE.pod ../POE-TODO.pod ../POE-HINTS.pod
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
use strict;
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is a version of sessions.perl that uses the &Session::create
# constructor.
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is a fake login prompt I wrote after noticing that someone's
# IRC 'bot was probing telnet whenever I joined a particular channel.
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w -I..
-# $Id$
# This is another of the earlier test programs. It creates a single
# session whose job is to create more of itself. There is a built-in
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# Aliases were originally called Names.
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is another simple functionality test. It tests sessions that
# are composed of objects (also called "object sessions"). The
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is another simple functionality test. It tests sessions that
# are composed of objects (also called "object sessions"). It is
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w -I..
-# $Id$
# This is a simple test of "package sessions". These are similar to
# object sessions, but they work with packages instead of objects. It
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is a simple job queue.
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is an early, basic test of POE's filehandle selecting
# mechanism. It was written before POE::Wheel classes were conceived.
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This is the first test program written for POE. It originally was
# written to test POE's ability to dispatch events to inline sessions
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This program tests signals. It tests OS signals (such as SIGINT),
# soft signals to sessions, and soft signals to kernels. Soft
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This program tests the high and low watermarks. It merges the
# wheels from wheels.perl and the chargen service from selects.perl to
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This program creates a server session and an infinitude of clients
# that connect to it, all in the same process. It's mainly used to
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# This program tests the high and low watermarks. It merges the
# wheels from wheels.perl and the chargen service from selects.perl to
View
@@ -1,5 +1,4 @@
#!/usr/bin/perl -w
-# $Id$
# A simple socket client that uses a two-handle wheel to pipe between
# a socket and the console. It's hardcoded to talk with wheels.perl's
View
@@ -1,14 +1,12 @@
-# $Id$
# Copyrights and documentation are after __END__.
package POE;
use strict;
use Carp qw( croak );
-use vars qw($VERSION $REVISION);
+use vars qw($VERSION);
$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
-$REVISION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
sub import {
my $self = shift;
View
@@ -1,12 +1,11 @@
-# $Id$
-# Copyrights and documentation are after __end__.
+# Copyrights and documentation are after __END__.
package POE::Component;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
1;
@@ -1,11 +1,9 @@
-# $Id$
-
package POE::Component::Client::TCP;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
use Carp qw(carp croak);
use Errno qw(ETIMEDOUT ECONNRESET);
@@ -1,11 +1,9 @@
-# $Id$
-
package POE::Component::Server::TCP;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
use Carp qw(carp croak);
use Socket qw(INADDR_ANY inet_ntoa inet_aton AF_INET AF_UNIX PF_UNIX);
View
@@ -1,11 +1,9 @@
-# $Id$
-
package POE::Driver;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
use Carp qw(croak);
View
@@ -1,5 +1,3 @@
-# $Id$
-
# Copyright 1998 Rocco Caputo <rcaputo@cpan.org>. All rights
# reserved. This program is free software; you can redistribute it
# and/or modify it under the same terms as Perl itself.
@@ -9,7 +7,7 @@ package POE::Driver::SysRW;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
use Errno qw(EAGAIN EWOULDBLOCK);
use Carp qw(croak);
View
@@ -1,11 +1,9 @@
-# $Id$
-
package POE::Filter;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
use Carp qw(croak);
View
@@ -1,12 +1,10 @@
-# $Id$
-
package POE::Filter::Block;
use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(croak);
View
@@ -6,7 +6,7 @@ use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(croak carp);
View
@@ -1,5 +1,3 @@
-# $Id$
-
# Filter::HTTPD Copyright 1998 Artur Bergman <artur@vogon.se>.
# Thanks go to Gisle Aas for his excellent HTTP::Daemon. Some of the
@@ -17,7 +15,7 @@ use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
sub BUFFER () { 0 }
View
@@ -1,12 +1,10 @@
-# $Id$
-
package POE::Filter::Line;
use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(carp croak);
View
@@ -6,7 +6,7 @@ use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(croak carp);
@@ -6,7 +6,7 @@ use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(croak);
@@ -1,5 +1,3 @@
-# $Id$
-
# Filter::Reference partial copyright 1998 Artur Bergman
# <artur@vogon-solutions.com>. Partial copyright 1999 Philip Gwyn.
@@ -9,7 +7,7 @@ use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(carp croak);
@@ -12,7 +12,7 @@ use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
use Carp qw(croak);
View
@@ -1,12 +1,10 @@
-# $Id$
-
package POE::Filter::Stream;
use strict;
use POE::Filter;
use vars qw($VERSION @ISA);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
@ISA = qw(POE::Filter);
#------------------------------------------------------------------------------
View
@@ -1,11 +1,9 @@
-## $Id$
-
package POE::Kernel;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
use POSIX qw(uname);
use Errno qw(ESRCH EINTR ECHILD EPERM EINVAL EEXIST EAGAIN EWOULDBLOCK);
View
@@ -1,5 +1,3 @@
-# $Id$
-
# POE module loader. Attempts to find XS versions of things first,
# then falls back to regular ones.
View
@@ -1,11 +1,9 @@
-# $Id$
-
package POE::Loop;
use strict;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.007'; # NOTE - Should be #.### (three decimal places)
1;
@@ -82,7 +80,7 @@ Here is a skeleton of a POE::Loop subclass:
package POE::Loop::YourToolkit;
use vars qw($VERSION);
- $VERSION = do {my@r=(q$Revision$=~/\d+/g);sprintf"%d."."%04d"x$#r,@r};
+ $VERSION = '1.000'; # NOTE - Should be #.### (three decimal places)
package POE::Kernel;
View
@@ -1,5 +1,3 @@
-# $Id$
-
# Event.pm event loop bridge for POE::Kernel.
# Empty package to appease perl.
@@ -12,7 +10,7 @@ use strict;
use POE::Loop::PerlSignals;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.300'; # NOTE - Should be #.### (three decimal places)
=for poe_tests
View
@@ -1,5 +1,3 @@
-# $Id$
-
# Gtk-Perl event loop bridge for POE::Kernel.
# Empty package to appease perl.
@@ -11,7 +9,7 @@ use strict;
use POE::Loop::PerlSignals;
use vars qw($VERSION);
-$VERSION = do {my($r)=(q$Revision$=~/(\d+)/);sprintf"1.%04d",$r};
+$VERSION = '1.300'; # NOTE - Should be #.### (three decimal places)
=for poe_tests
Oops, something went wrong.

0 comments on commit 5959004

Please sign in to comment.