[poe-commits] SF.net SVN: poe: [1906] trunk/poe/lib/POE
Brought to you by:
rcaputo
From: <rc...@us...> - 2006-03-23 05:45:49
|
Revision: 1906 Author: rcaputo Date: 2006-03-22 21:44:47 -0800 (Wed, 22 Mar 2006) ViewCVS: http://svn.sourceforge.net/poe/?rev=1906&view=rev Log Message: ----------- Make some minor syntactical changes to some comments to support a side project. Modified Paths: -------------- trunk/poe/lib/POE/Kernel.pm trunk/poe/lib/POE/Wheel/ReadLine.pm Modified: trunk/poe/lib/POE/Kernel.pm =================================================================== --- trunk/poe/lib/POE/Kernel.pm 2006-03-21 05:58:24 UTC (rev 1905) +++ trunk/poe/lib/POE/Kernel.pm 2006-03-23 05:44:47 UTC (rev 1906) @@ -1679,7 +1679,7 @@ # # Return the names of pending timed events. # @event_names = $kernel->queue_peek_alarms( ); # -# =item queue_peek_alarms +# =item queue_peek_alarms # # queue_peek_alarms() returns a time-ordered list of event names from # the current session that have pending timed events. If a event Modified: trunk/poe/lib/POE/Wheel/ReadLine.pm =================================================================== --- trunk/poe/lib/POE/Wheel/ReadLine.pm 2006-03-21 05:58:24 UTC (rev 1905) +++ trunk/poe/lib/POE/Wheel/ReadLine.pm 2006-03-23 05:44:47 UTC (rev 1906) @@ -1328,9 +1328,9 @@ $defuns->{$name} = $fn; } -# ==================================================== +# ----------------------------------------------------- # Any variable assignments that we care about -# ==================================================== +# ----------------------------------------------------- sub rl_set_keymap { my ($self, $arg) = @_; $arg = lc($arg); @@ -1342,11 +1342,11 @@ $self->[SELF_INSERT_MODE] = 1; } -# ==================================================== +# ---------------------------------------------------- # From here on, we have the helper functions which can # be bound to keys. The functions are named after the # readline counterparts. -# ==================================================== +# ---------------------------------------------------- sub rl_self_insert { my ($self, $key, $raw_key) = @_; This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |