5 Commits

Author SHA1 Message Date
Mario Fetka
1960185f6a Intial commit 2017-09-15 16:05:19 +02:00
Mario Fetka
895dd03103 Merge tag 'upstream/1.05'
Upstream version 1.05
2017-09-15 16:04:39 +02:00
Mario Fetka
563d8fdc61 Imported Upstream version 1.05 2017-09-15 16:04:39 +02:00
Mario Fetka
78b234ca9e Intial commit 2017-09-15 16:04:17 +02:00
Christoph Berg
1b6b73085d Imported Debian patch 1.04-3 2017-09-15 16:00:59 +02:00
14 changed files with 172 additions and 151 deletions

View File

@@ -1,71 +0,0 @@
;; -*- coding: emacs-mule; -*-
;; --------------------------------------------------------------------------
;; Desktop File for Emacs
;; --------------------------------------------------------------------------
;; Created Fri Feb 18 13:17:58 2005
;; Emacs version 21.2.1
;; Global section:
(setq desktop-missing-file-warning nil)
(setq tags-file-name nil)
(setq tags-table-list nil)
(setq search-ring '("sub default" "sub constructor" "constructor" "constructor method" "sub getne" "current" "getnext" "geto" "getobject" "getnextobjectid"))
(setq regexp-search-ring nil)
(setq register-alist nil)
;; Buffer section:
(desktop-create-buffer 205
"/home/jjordan/src/perl/Test-MockClass/Makefile.PL"
"Makefile.PL"
'perl-mode
'(nil)
1
'(nil nil)
nil
nil
nil)
(desktop-create-buffer 205
"/home/jjordan/src/perl/Perl-SemanticNet/t/01_SemanticNet_Node.t"
"01_SemanticNet_Node.t"
'cperl-mode
'(nil)
441
'(nil nil)
nil
nil
nil)
(desktop-create-buffer 205
"/home/jjordan/src/perl/Test-MockClass/t/00_MockClass.t"
"00_MockClass.t"
'cperl-mode
'(nil)
2858
'(1 t)
nil
nil
nil)
(desktop-create-buffer 205
"/home/jjordan/src/perl/Test-MockClass/lib/Test/MockClass.pm"
"MockClass.pm"
'cperl-mode
'(nil)
12990
'(17434 t)
nil
nil
nil)
(desktop-create-buffer 205
"/tmp/cvsdz8zNY"
"cvsdz8zNY"
'fundamental-mode
nil
14
'(nil nil)
nil
nil
nil)

View File

@@ -1,4 +1,3 @@
.emacs.desktop
lib/Test/MockClass/MyClass.pm lib/Test/MockClass/MyClass.pm
lib/Test/MockClass.pm lib/Test/MockClass.pm
Makefile.PL Makefile.PL

View File

@@ -1,10 +1,26 @@
# http://module-build.sourceforge.net/META-spec.html --- #YAML:1.0
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX# name: Test-MockClass
name: Test-MockClass version: 1.05
version: 1.04 abstract: A class to create mock classes and object for testing purposes
version_from: lib/Test/MockClass.pm author:
installdirs: site - Jeremiah Jordan <jjordan@perlreason.com>
license: unknown
distribution_type: module
configure_requires:
ExtUtils::MakeMaker: 0
build_requires:
ExtUtils::MakeMaker: 0
requires: requires:
Hook::WrapSub: 0.03
distribution_type: module Scalar::Util: 1.14
generated_by: ExtUtils::MakeMaker version 6.17 Task::Weaken: 0
Test::SimpleUnit: 1.21
Tie::Watch: 1.1
no_index:
directory:
- t
- inc
generated_by: ExtUtils::MakeMaker version 6.56
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: 1.4

View File

@@ -1,66 +1,5 @@
#!/usr/bin/perl #!/usr/bin/perl
# use ExtUtils::MakeMaker;
# Perl Makefile for Test-Mockclass
# $Id: Makefile.PL,v 1.1.1.1 2005/02/16 19:46:23 phaedrus Exp $
#
# Invocation:
# $ perl Makefile.PL # interactive behaviour
# $ perl Makefile.PL --defaultdeps # accept default value on prompts
# $ perl Makefile.PL --checkdeps # check only, no Makefile produced
# $ perl Makefile.PL --skipdeps # ignores all dependencies
# $ perl Makefile.PL --testonly # don't write installation targets
#
# Then, to build:
# $ make [all|test|install] # install dependencies first
# $ make checkdeps # same as the --checkdeps above
# $ make installdeps # install dependencies only
#
# ExtUtils::AutoInstall Bootstrap Code, version 7.
BEGIN{my$p='ExtUtils::AutoInstall';my$v=0.45;$p->VERSION||0>=$v
or+eval"use $p $v;1"or+do{my$e=$ENV{PERL_EXTUTILS_AUTOINSTALL};
(!defined($e)||$e!~m/--(?:default|skip|testonly)/and-t STDIN or
eval"use ExtUtils::MakeMaker;WriteMakefile(PREREQ_PM=>{'$p',$v}
);1"and exit)and print"==> $p $v required. Install it from CP".
"AN? [Y/n] "and<STDIN>!~/^n/i and print"*** Installing $p\n"and
do{if (eval '$>' and lc(`sudo -V`) =~ /version/){system('sudo',
$^X,"-MCPANPLUS","-e","CPANPLUS::install $p");eval"use $p $v;1"
||system('sudo', $^X, "-MCPAN", "-e", "CPAN::install $p")}eval{
require CPANPLUS;CPANPLUS::install$p};eval"use $p $v;1"or eval{
require CPAN;CPAN::install$p};eval"use $p $v;1"||die"*** Please
manually install $p $v from cpan.org first...\n"}}}
use File::Find;
# the above handlers must be declared before the 'use' statement
use ExtUtils::AutoInstall (
# required AutoInstall version
-version => '0.40',
# core modules; may also be 'all'
-core => {
Hook::WrapSub => 0.03,
Scalar::Util => 1.14,
Test::SimpleUnit => 1.21,
Tie::Watch => 1.1,
},
);
# Build a custom list of modules to install. This is because the parser module
# generation happens because it's a target, so it doesn't exist before the
# PM list is generated
my %pm = ();
File::Find::find(
sub {
if (/\.pm$/s) {
my $name = "$File::Find::dir/$_";
print "Adding: $_ => $name\n";
($pm{$name} = $name) =~ s{lib/}{\$(INST_LIBDIR)/}
}
}, "lib" );
WriteMakefile( WriteMakefile(
NAME => 'MockClass', NAME => 'MockClass',
@@ -68,15 +7,21 @@ WriteMakefile(
VERSION_FROM => 'lib/Test/MockClass.pm', VERSION_FROM => 'lib/Test/MockClass.pm',
AUTHOR => 'Jeremiah Jordan <jjordan@perlreason.com>', AUTHOR => 'Jeremiah Jordan <jjordan@perlreason.com>',
ABSTRACT => 'A class to create mock classes and object for testing purposes', ABSTRACT => 'A class to create mock classes and object for testing purposes',
PM => \%pm, PREREQ_PM => {
'Hook::WrapSub' => 0.03,
'Scalar::Util' => 1.14,
'Task::Weaken' => 0,
'Test::SimpleUnit' => 1.21,
'Tie::Watch' => 1.1,
},
dist => { dist => {
TARFLAGS => 'cvf', TARFLAGS => 'cvf',
CI => "cvs commit", CI => "cvs commit",
RCS_LABEL => 'cvs tag r$(VERSION_SYM)', RCS_LABEL => 'cvs tag r$(VERSION_SYM)',
SUFFIX => ".gz", SUFFIX => ".gz",
DIST_CP => 'ln', DIST_CP => 'ln',
DIST_DEFAULT => 'all tardist', DIST_DEFAULT => 'all tardist',
COMPRESS => "gzip", COMPRESS => "gzip",
}, },
clean => { FILES => "*.tar.bz2 *.tar.gz" }, clean => { FILES => "*.tar.bz2 *.tar.gz" },
); );

38
debian/changelog vendored Normal file
View File

@@ -0,0 +1,38 @@
libtest-mockclass-perl (1.05-3) unstable; urgency=low
[ Salvatore Bonaccorso ]
* debian/control: Changed: Replace versioned (build-)dependency on
perl (>= 5.6.0-{12,16}) with an unversioned dependency on perl (as
permitted by Debian Policy 3.8.3).
[ Christoph Berg ]
* Remove myself from Uploaders.
* Build-Depend on libextutils-autoinstall-perl as required by
dh_auto_configure.
[ Ryan Niebur ]
* Update ryan52's email address
-- Christoph Berg <myon@debian.org> Wed, 09 Dec 2009 13:35:28 +0100
libtest-mockclass-perl (1.04-2) unstable; urgency=low
[ Ryan Niebur ]
* add missing (build-)dep on libhook-wrapsub-perl (Closes: #536649)
* Add myself to Uploaders
* s/^A // on short description
* fix long description to not use first person
* patch to fix the POD errors
* add 'License-Alias: Perl' to d/copyright
[ gregor herrmann ]
* debian/copyright: put the actual copyright holder into the Copyright
field.
-- Ryan Niebur <ryanryan52@gmail.com> Sat, 11 Jul 2009 22:32:27 -0700
libtest-mockclass-perl (1.04-1) unstable; urgency=low
* Initial Release.
-- Christoph Berg <myon@debian.org> Fri, 3 Jul 2009 14:36:05 +0200

1
debian/compat vendored Normal file
View File

@@ -0,0 +1 @@
7

20
debian/control vendored Normal file
View File

@@ -0,0 +1,20 @@
Source: libtest-mockclass-perl
Section: perl
Priority: optional
Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7)
Build-Depends-Indep: perl, libextutils-autoinstall-perl, libtest-simpleunit-perl, perl-tk, libhook-wrapsub-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>
Uploaders: Ryan Niebur <ryan@debian.org>
Standards-Version: 3.8.3
Homepage: http://search.cpan.org/dist/Test-MockClass/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libtest-mockclass-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libtest-mockclass-perl/
Package: libtest-mockclass-perl
Architecture: all
Depends: ${perl:Depends}, ${misc:Depends}, perl-tk, libhook-wrapsub-perl
Description: module to provide mock classes and mock objects for testing
Test::MockClass provides a simple interface for creating mock classes
and mock objects with mock methods for testing purposes. It also
provides a simple mechanism for tracking the interactions to the
mocked objects.

35
debian/copyright vendored Normal file
View File

@@ -0,0 +1,35 @@
Format-Specification:
http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
Upstream-Maintainer: Jeremiah Jordan <jjordan@perlreason.com>
Upstream-Source: http://search.cpan.org/dist/Test-MockClass/
Upstream-Name: Test-MockClass
Comment:
Initial packaging of this module was kindly funded by Dembach Goo Informatik
on behalf of Allianz24.
Files: *
Copyright: 2002, 2003, 2004, 2005 perl Reason, LLC. All Rights Reserved.
Inspired by Test::MockObject by chromatic, and by Test::Unit::Mockup (ruby)
by Michael Granger. Both of whom were probably inspired by other people
(J-unit, Xunit types maybe?) which all goes back to that sUnit guy. Thanks
to Stevan Little for the constructive criticism.
License-Alias: Perl
License: Artistic | GPL-1+
Files: debian/*
Copyright: 2009, Christoph Berg <myon@debian.org>
License: Artistic | GPL-1+
License: Artistic
This program is free software; you can redistribute it and/or modify
it under the terms of the Artistic License, which comes with Perl.
On Debian GNU/Linux systems, the complete text of the Artistic License
can be found in `/usr/share/common-licenses/Artistic'
License: GPL-1+
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 1, or (at your option)
any later version.
On Debian GNU/Linux systems, the complete text of the GNU General
Public License can be found in `/usr/share/common-licenses/GPL'

30
debian/patches/fix-pod vendored Normal file
View File

@@ -0,0 +1,30 @@
fix POD syntax problems
--- a/lib/Test/MockClass.pm
+++ b/lib/Test/MockClass.pm
@@ -3,7 +3,7 @@
=head1 NAME
- Test::MockClass - A module to provide mock classes and mock objects for testing
+Test::MockClass - A module to provide mock classes and mock objects for testing
=head1 SYNOPSIS
@@ -244,12 +244,16 @@
=head1 SEE ALSO
+=over 4
+
=item Alternatives: L<Test::MockObject>, L<Test::MockMethod>
=item Testing systems: L<Test::Simple>, L<Test::More>, L<Test::Builder>, L<Test::Harness>
=item xUnit testing: L<Test::SimpleUnit>, L<Test::Unit>, L<Test::Class>
+=back
+
=head1 AUTHOR
Jeremiah Jordan E<lt>jjordan@perlreason.comE<gt>

1
debian/patches/series vendored Normal file
View File

@@ -0,0 +1 @@
fix-pod

4
debian/rules vendored Executable file
View File

@@ -0,0 +1,4 @@
#!/usr/bin/make -f
%:
dh --with quilt $@

1
debian/source/format vendored Normal file
View File

@@ -0,0 +1 @@
3.0 (quilt)

2
debian/watch vendored Normal file
View File

@@ -0,0 +1,2 @@
version=3
http://search.cpan.org/dist/Test-MockClass/ .*/Test-MockClass-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$

View File

@@ -279,8 +279,8 @@ BEGIN {
### Versioning stuff and custom includes ### Versioning stuff and custom includes
use vars qw{$VERSION $RCSID}; use vars qw{$VERSION $RCSID};
$VERSION = do { my @r = (q$Revision: 1.4 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; $VERSION = do { my @r = (q$Revision: 1.5 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
$RCSID = q$Id: MockClass.pm,v 1.4 2005/02/18 21:16:20 phaedrus Exp $; $RCSID = q$Id: MockClass.pm,v 1.5 2005/02/18 21:16:20 phaedrus Exp $;
use Carp; use Carp;
use Hook::WrapSub qw{wrap_subs unwrap_subs}; use Hook::WrapSub qw{wrap_subs unwrap_subs};
use Tie::Watch; use Tie::Watch;