r71086 - in /branches/upstream/libapp-nopaste-perl/current: Changes MANIFEST META.yml lib/App/Nopaste.pm lib/App/Nopaste/Command.pm lib/App/Nopaste/Service/Mathbin.pm lib/App/Nopaste/Service/Pastie.pm t/000-load.t
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Fri Mar 11 01:30:53 UTC 2011
Author: jawnsy-guest
Date: Fri Mar 11 01:30:31 2011
New Revision: 71086
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71086
Log:
[svn-upgrade] new version libapp-nopaste-perl (0.27)
Removed:
branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Service/Mathbin.pm
Modified:
branches/upstream/libapp-nopaste-perl/current/Changes
branches/upstream/libapp-nopaste-perl/current/MANIFEST
branches/upstream/libapp-nopaste-perl/current/META.yml
branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste.pm
branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Command.pm
branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Service/Pastie.pm
branches/upstream/libapp-nopaste-perl/current/t/000-load.t
Modified: branches/upstream/libapp-nopaste-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/Changes?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/Changes (original)
+++ branches/upstream/libapp-nopaste-perl/current/Changes Fri Mar 11 01:30:31 2011
@@ -1,4 +1,9 @@
Revision history for App-Nopaste
+
+0.27 Thu Mar 10 2011
+ Correct path to Pastie (Sebastian Paaske Tørholm )
+ Throw an error if you specify -p and files (Shawn M Moore)
+ Remove Mathbin; doy moved it to a separate dist (Shawn M Moore)
0.26 Wed Feb 23 2011
Add --open (-o) for opening the nopaste in your browser (Thomas Sibley)
Modified: branches/upstream/libapp-nopaste-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/MANIFEST?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/MANIFEST (original)
+++ branches/upstream/libapp-nopaste-perl/current/MANIFEST Fri Mar 11 01:30:31 2011
@@ -19,7 +19,6 @@
lib/App/Nopaste/Service/Codepeek.pm
lib/App/Nopaste/Service/Debian.pm
lib/App/Nopaste/Service/Gist.pm
-lib/App/Nopaste/Service/Mathbin.pm
lib/App/Nopaste/Service/PastebinCom.pm
lib/App/Nopaste/Service/Pastie.pm
lib/App/Nopaste/Service/Shadowcat.pm
Modified: branches/upstream/libapp-nopaste-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/META.yml?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/META.yml (original)
+++ branches/upstream/libapp-nopaste-perl/current/META.yml Fri Mar 11 01:30:31 2011
@@ -33,4 +33,4 @@
homepage: http://github.com/sartak/app-nopaste/tree
license: http://dev.perl.org/licenses/
repository: git://github.com/sartak/app-nopaste.git
-version: 0.26
+version: 0.27
Modified: branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste.pm?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste.pm (original)
+++ branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste.pm Fri Mar 11 01:30:31 2011
@@ -7,10 +7,10 @@
use base 'Exporter';
our @EXPORT_OK = 'nopaste';
-our $VERSION = '0.26';
+our $VERSION = '0.27';
sub nopaste {
- # process arguments {{{
+ # process arguments
# allow "nopaste($text)"
unshift @_, 'text' if @_ == 1;
@@ -42,8 +42,8 @@
or Carp::croak "You must specify the text to nopaste";
$args{error_handler} ||= sub { warn "$_[1]: $_[0]" };
- # }}}
- # try to paste to each service in order {{{
+
+ # try to paste to each service in order
for my $service (@{ $args{services} }) {
$service = "App::Nopaste::Service::$service"
unless $service =~ /^App::Nopaste::Service/;
@@ -70,7 +70,6 @@
# failure!
$args{error_handler}->($ret[1], $service);
}
- # }}}
Carp::croak "No available App::Nopaste::Service modules found";
}
Modified: branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Command.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Command.pm?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Command.pm (original)
+++ branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Command.pm Fri Mar 11 01:30:31 2011
@@ -138,6 +138,10 @@
sub read_text {
my $self = shift;
+ if ($self->paste && @{ $self->extra_argv }) {
+ die "You may not specify --paste and files simultaneously.\n";
+ }
+
if ($self->paste) {
require Clipboard;
Clipboard->import;
Modified: branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Service/Pastie.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Service/Pastie.pm?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Service/Pastie.pm (original)
+++ branches/upstream/libapp-nopaste-perl/current/lib/App/Nopaste/Service/Pastie.pm Fri Mar 11 01:30:31 2011
@@ -3,7 +3,7 @@
use warnings;
use base 'App::Nopaste::Service';
-sub uri { 'http://pastie.caboo.se/pastes/create' }
+sub uri { 'http://pastie.org/' }
sub fill_form {
my $self = shift;
Modified: branches/upstream/libapp-nopaste-perl/current/t/000-load.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libapp-nopaste-perl/current/t/000-load.t?rev=71086&op=diff
==============================================================================
--- branches/upstream/libapp-nopaste-perl/current/t/000-load.t (original)
+++ branches/upstream/libapp-nopaste-perl/current/t/000-load.t Fri Mar 11 01:30:31 2011
@@ -1,13 +1,12 @@
use strict;
use warnings;
-use Test::More tests => 11;
+use Test::More tests => 10;
use_ok 'App::Nopaste';
use_ok 'App::Nopaste::Service';
use_ok 'App::Nopaste::Service::Codepeek';
use_ok 'App::Nopaste::Service::Debian';
use_ok 'App::Nopaste::Service::Gist';
-use_ok 'App::Nopaste::Service::Mathbin';
use_ok 'App::Nopaste::Service::PastebinCom';
use_ok 'App::Nopaste::Service::Pastie';
use_ok 'App::Nopaste::Service::Shadowcat';
More information about the Pkg-perl-cvs-commits
mailing list