1. Toby Inkster
  2. p5-ask

Commits

Toby Inkster  committed fed8db4

bump version to stable; document Ask::Callback

  • Participants
  • Parent commits eb63ada
  • Branches default

Comments (0)

Files changed (6)

File lib/Ask.pm

View file
  • Ignore whitespace
 	package Ask;
 	
 	our $AUTHORITY = 'cpan:TOBYINK';
-	our $VERSION   = '0.000_02';
+	our $VERSION   = '0.001';
 	
 	use Carp qw(croak);
 	use File::Which qw(which);

File lib/Ask/API.pm

View file
  • Ignore whitespace
 	package Ask::API;
 	
 	our $AUTHORITY = 'cpan:TOBYINK';
-	our $VERSION   = '0.000_02';
+	our $VERSION   = '0.001';
 	
 	use Moo::Role;
 	

File lib/Ask/Callback.pm

View file
  • Ignore whitespace
-# This primarily exists for testing... but you can use it too!
-#
-
 use 5.010;
 use strict;
 use warnings;
 	package Ask::Callback;
 	
 	our $AUTHORITY = 'cpan:TOBYINK';
-	our $VERSION   = '0.000_02';
+	our $VERSION   = '0.001';
 	
 	use Moo;
 	use namespace::sweep;
 }
 
 1;
+
+__END__
+
+=head1 NAME
+
+Ask::Callback - interact with yourself via callbacks
+
+=head1 SYNOPSIS
+
+	my $ask = Ask::Callback->new(
+		input_callback   => sub { ... },
+		output_callback  => sub { ... },
+	);
+
+=head1 DESCRIPTION
+
+Primarily for the test suite.
+
+The input_callback is expected to return text which we pretend "the user
+typed in".
+
+The output_callback is passed text which we pretend to "show the user".
+
+=head1 BUGS
+
+Please report any bugs to
+L<http://rt.cpan.org/Dist/Display.html?Queue=Ask>.
+
+=head1 SEE ALSO
+
+L<Ask>.
+
+=head1 AUTHOR
+
+Toby Inkster E<lt>tobyink@cpan.orgE<gt>.
+
+=head1 COPYRIGHT AND LICENCE
+
+This software is copyright (c) 2012 by Toby Inkster.
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
+
+=head1 DISCLAIMER OF WARRANTIES
+
+THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
+WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
+MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+

File lib/Ask/STDIO.pm

View file
  • Ignore whitespace
 	package Ask::STDIO;
 	
 	our $AUTHORITY = 'cpan:TOBYINK';
-	our $VERSION   = '0.000_02';
+	our $VERSION   = '0.001';
 	
 	use Moo;
 	use namespace::sweep;

File lib/Ask/Tk.pm

View file
  • Ignore whitespace
 	package Ask::Tk;
 	
 	our $AUTHORITY = 'cpan:TOBYINK';
-	our $VERSION   = '0.000_02';
+	our $VERSION   = '0.001';
 
 	use Moo;
 	use Tk;

File lib/Ask/Zenity.pm

View file
  • Ignore whitespace
 	package Ask::Zenity;
 	
 	our $AUTHORITY = 'cpan:TOBYINK';
-	our $VERSION   = '0.000_02';
+	our $VERSION   = '0.001';
 	
 	use Moo;
 	use System::Command;