[libxray-spacegroup-perl] 01/15: Imported Debian patch 0.1.1-1
gregor herrmann
gregoa at debian.org
Tue Jul 28 16:48:57 UTC 2015
This is an automated email from the git hooks/post-receive script.
gregoa pushed a commit to branch master
in repository libxray-spacegroup-perl.
commit 5c6950031cdd3dba68ec2c7ce369468544e65803
Author: Carlo Segre <segre at debian.org>
Date: Mon Mar 2 21:10:37 2009 -0600
Imported Debian patch 0.1.1-1
---
debian/changelog | 12 ++++
debian/compat | 1 +
debian/control | 19 ++++++
debian/copyright | 17 +++++
debian/dirs | 1 +
debian/patches/modify-test-script | 131 ++++++++++++++++++++++++++++++++++++++
debian/patches/series | 1 +
debian/rules | 83 ++++++++++++++++++++++++
8 files changed, 265 insertions(+)
diff --git a/debian/changelog b/debian/changelog
new file mode 100644
index 0000000..d37e89a
--- /dev/null
+++ b/debian/changelog
@@ -0,0 +1,12 @@
+libxray-spacegroup-perl (0.1.1-1) unstable; urgency=low
+
+ * Initial release (Closes: #517947)
+
+ -- Carlo Segre <segre at debian.org> Mon, 02 Mar 2009 21:10:37 -0600
+
+libxray-spacegroup-perl (0.1.0-1) unstable; urgency=low
+
+ * Initial unofficial release
+
+ -- Carlo Segre <segre at debian.org> Sun, 27 Jul 2008 11:20:32 -0500
+
diff --git a/debian/compat b/debian/compat
new file mode 100644
index 0000000..7f8f011
--- /dev/null
+++ b/debian/compat
@@ -0,0 +1 @@
+7
diff --git a/debian/control b/debian/control
new file mode 100644
index 0000000..49c182c
--- /dev/null
+++ b/debian/control
@@ -0,0 +1,19 @@
+Source: libxray-spacegroup-perl
+Section: perl
+Priority: optional
+Build-Depends: debhelper (>= 7), quilt
+Build-Depends-Indep: perl (>= 5.8.8), perl-modules, libreadonly-perl,
+ libregexp-optimizer-perl, liblist-moreutils-perl, libclass-std-perl
+Maintainer: Carlo Segre <segre at debian.org>
+Standards-Version: 3.8.0
+Homepage: http://cars9.uchicago.edu/~ravel/software/
+
+Package: libxray-spacegroup-perl
+Architecture: all
+Depends: ${perl:Depends}, ${misc:Depends}, perl-modules, libreadonly-perl,
+ libregexp-optimizer-perl, liblist-moreutils-perl, libclass-std-perl
+Homepage: http://cars9.uchicago.edu/~ravel/software/
+Description: symmetry operations for the crystal space groups
+ This module provides an object-oriented interface to a database of
+ space group symmetries transcribed from volume A of the International
+ Tables of Crystallography.
diff --git a/debian/copyright b/debian/copyright
new file mode 100644
index 0000000..76fd42b
--- /dev/null
+++ b/debian/copyright
@@ -0,0 +1,17 @@
+This package was debianized by Carlo Segre <segre at debian.org> on
+Sat, 26 Jul 2008 18:19:32 -0500.
+
+It was downloaded from http://cars9.uchicago.edu/svn/libperlxray
+
+Upstream Author: Bruce Ravel <bravel at bnl.gov>
+
+Copyright (c) 1999-2008 Bruce Ravel
+
+License:
+
+All rights reserved. This program is free software; you can
+redistribute it and/or modify it under the same terms as Perl
+itself, see `/usr/share/common-licenses/Artistic'.
+
+The Debian packaging is (C) 2008, Carlo Segre <segre at debian.org> and
+is licensed under the GPL, see `/usr/share/common-licenses/GPL-2'.
diff --git a/debian/dirs b/debian/dirs
new file mode 100644
index 0000000..dd222db
--- /dev/null
+++ b/debian/dirs
@@ -0,0 +1 @@
+usr/share
diff --git a/debian/patches/modify-test-script b/debian/patches/modify-test-script
new file mode 100644
index 0000000..ce2b9a9
--- /dev/null
+++ b/debian/patches/modify-test-script
@@ -0,0 +1,131 @@
+--- a/t/test.t
++++ b/t/test.t
+@@ -1,64 +1,83 @@
+-#!/usr/bin/perl -I../blib/lib/
++#!/usr/bin/perl -w ## -*- cperl -*-
++
++# Before `make install' is performed this script should be runnable with
++# `make test'. After `make install' it should work as `perl test.pl'
+
+-use Test::Simple tests => 19;
++######################### We start with some black magic to print on failure.
+
++# Change 1..1 below to 1..last_test_to_print .
++# (It may become useful if the test is moved to ./t subdirectory.)
++
++BEGIN { $| = 1; print "1..1$/"; }
++END {print "not ok 1$/" unless $loaded;}
+ use Xray::SpaceGroup;
++$loaded = 1;
++print "ok 1$/";
++
++######################### End of black magic.
++# Comment out all old tests (CUS 2008/07/27)
++
++#!/usr/bin/perl -I../blib/lib/
++
++#use Test::Simple tests => 19;
++
++#use Xray::SpaceGroup;
+
+ ############################################################
+ ## Tests of extracting information from the database
+-my $sg = Xray::SpaceGroup -> new({group=>'pc'});
+-ok($sg->group eq 'p c', "canonicalize space group");
+-ok($sg->given eq 'pc', "given group retained");
+-ok($sg->schoenflies eq 'c_s^2', "obtain schoenflies symbol");
+-ok($sg->class eq 'monoclinic', "obtain crystal class");
+-ok($sg->setting eq 'b_unique_1', "crystal setting");
+-
+-my @positions = $sg->positions;
+-my ($x, $y, $z) = (0.2, 0.3, 0.4);
+-my @pos1 = (eval "$positions[1]->[0]",
+- eval "$positions[1]->[1]",
+- eval "$positions[1]->[2]" ); # ("$x", "-$y", "$z+1/2")
+-ok($pos1[0] == 0.2 && $pos1[1] == -0.3 && $pos1[2] == 0.9, "compute from positions");
+-
+-$sg = Xray::SpaceGroup -> new({group=>'f d -3 m'});
+-my @list = $sg->bravais;
+-ok($#list == 8, "obtain Bravais translations");
+-
+-$sg = Xray::SpaceGroup -> new({group=>'f d -3 m'});
+- at list = $sg->positions;
+-ok($#list == 47, "obtain positions");
++#my $sg = Xray::SpaceGroup -> new({group=>'pc'});
++#ok($sg->group eq 'p c', "canonicalize space group");
++#ok($sg->given eq 'pc', "given group retained");
++#ok($sg->schoenflies eq 'c_s^2', "obtain schoenflies symbol");
++#ok($sg->class eq 'monoclinic', "obtain crystal class");
++#ok($sg->setting eq 'b_unique_1', "crystal setting");
++
++#my @positions = $sg->positions;
++#my ($x, $y, $z) = (0.2, 0.3, 0.4);
++#my @pos1 = (eval "$positions[1]->[0]",
++# eval "$positions[1]->[1]",
++# eval "$positions[1]->[2]" ); # ("$x", "-$y", "$z+1/2")
++#ok($pos1[0] == 0.2 && $pos1[1] == -0.3 && $pos1[2] == 0.9, "compute from positions");
++
++#$sg = Xray::SpaceGroup -> new({group=>'f d -3 m'});
++#my @list = $sg->bravais;
++#ok($#list == 8, "obtain Bravais translations");
++
++#$sg = Xray::SpaceGroup -> new({group=>'f d -3 m'});
++#@list = $sg->positions;
++#ok($#list == 47, "obtain positions");
+
+ ############################################################
+ ## Tests of parsing space group symbols
+-$sg = Xray::SpaceGroup -> new({group=>'pm3m'});
+-ok($sg->group eq 'p m -3 m', "no spaces in symbol");
++#$sg = Xray::SpaceGroup -> new({group=>'pm3m'});
++#ok($sg->group eq 'p m -3 m', "no spaces in symbol");
+
+-$sg = Xray::SpaceGroup -> new({group=>'Pm3M'});
+-ok($sg->group eq 'p m -3 m', "mixed case in symbol");
++#$sg = Xray::SpaceGroup -> new({group=>'Pm3M'});
++#ok($sg->group eq 'p m -3 m', "mixed case in symbol");
+
+-$sg = Xray::SpaceGroup -> new({group=>'p m 3 m'});
+-ok($sg->group eq 'p m -3 m', "lots of spaces in symbol");
++#$sg = Xray::SpaceGroup -> new({group=>'p m 3 m'});
++#ok($sg->group eq 'p m -3 m', "lots of spaces in symbol");
+
+-$sg = Xray::SpaceGroup -> new({group=>"pm\t3 \t m"});
+-ok($sg->group eq 'p m -3 m', "tabs in symbol");
++#$sg = Xray::SpaceGroup -> new({group=>"pm\t3 \t m"});
++#ok($sg->group eq 'p m -3 m', "tabs in symbol");
+
+-$sg = Xray::SpaceGroup -> new({group=>'o_h^1'});
+-ok($sg->group eq 'p m -3 m', "shoenflies forward");
++#$sg = Xray::SpaceGroup -> new({group=>'o_h^1'});
++#ok($sg->group eq 'p m -3 m', "shoenflies forward");
+
+-$sg = Xray::SpaceGroup -> new({group=>'o^1_h'});
+-ok($sg->group eq 'p m -3 m', "shoenflies backward");
++#$sg = Xray::SpaceGroup -> new({group=>'o^1_h'});
++#ok($sg->group eq 'p m -3 m', "shoenflies backward");
+
+-$sg = Xray::SpaceGroup -> new({group=>'perovskite'});
+-ok($sg->group eq 'p m -3 m', "nickname");
++#$sg = Xray::SpaceGroup -> new({group=>'perovskite'});
++#ok($sg->group eq 'p m -3 m', "nickname");
+
+-$sg = Xray::SpaceGroup -> new({group=>221});
+-ok($sg->group eq 'p m -3 m', "number");
++#$sg = Xray::SpaceGroup -> new({group=>221});
++#ok($sg->group eq 'p m -3 m', "number");
+
+-$sg = Xray::SpaceGroup -> new({group=>'p 4/m -3 2/m'});
+-ok($sg->group eq 'p m -3 m', "full symbol");
++#$sg = Xray::SpaceGroup -> new({group=>'p 4/m -3 2/m'});
++#ok($sg->group eq 'p m -3 m', "full symbol");
+
+-$sg = Xray::SpaceGroup -> new({group=>'p4/ m -3 2 /m'});
+-ok($sg->group eq 'p m -3 m', "full symbol, weird spacing");
++#$sg = Xray::SpaceGroup -> new({group=>'p4/ m -3 2 /m'});
++#ok($sg->group eq 'p m -3 m', "full symbol, weird spacing");
+
+-$sg = Xray::SpaceGroup -> new({group=>'p 6_3 m c'});
+-ok($sg->group eq 'p 63 m c', "underscore for subscript");
++#$sg = Xray::SpaceGroup -> new({group=>'p 6_3 m c'});
++#ok($sg->group eq 'p 63 m c', "underscore for subscript");
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..0e3c44b
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+modify-test-script
diff --git a/debian/rules b/debian/rules
new file mode 100755
index 0000000..f9aca66
--- /dev/null
+++ b/debian/rules
@@ -0,0 +1,83 @@
+#!/usr/bin/make -f
+# This debian/rules file is provided as a template for perl packages
+# using the Module::Build system. It was written by Carlo Segre and
+# may be freely used.
+
+# Uncomment this to turn on verbose mode.
+#export DH_VERBOSE=1
+
+# Uncomment if patches required
+include /usr/share/quilt/quilt.make
+
+# If set to a true value then MakeMaker's prompt function will
+# always return the default without waiting for user input.
+export PERL_MM_USE_DEFAULT=1
+
+PACKAGE=$(shell dh_listpackages)
+
+ifndef PERL
+PERL = /usr/bin/perl
+endif
+
+TMP = $(CURDIR)/debian/$(PACKAGE)
+
+build: build-stamp
+
+# Use "build-stamp: $(QUILT_STAMPFN)" if patches required
+build-stamp: $(QUILT_STAMPFN)
+ dh_testdir
+
+ # Generate the Build script and run it
+ $(PERL) Build.PL destdir=$(TMP)
+ ./Build build
+ ./Build test
+ touch $@
+
+# Use "clean: unpatch" if patches required
+clean: unpatch
+ dh_testdir
+ dh_testroot
+
+ dh_clean build-stamp install-stamp
+
+ # Clean up all directories and the Build script
+ [ ! -f Build ] || ./Build realclean
+
+install: install-stamp
+install-stamp: build-stamp
+ dh_testdir
+ dh_testroot
+ dh_prep
+
+ # Install package in temporary directory
+ ./Build install --installdirs vendor
+ # remove .packlist
+ rm -rf $(TMP)/usr/lib/perl5/auto
+ # remove empty dirs if they exist
+ [ ! -d $(TMP)/usr/bin ] || rmdir --parents --ignore-fail-on-non-empty --verbose $(TMP)/usr/bin
+ [ ! -d $(TMP)/usr/lib/perl5 ] || rmdir --parents --ignore-fail-on-non-empty --verbose $(TMP)/usr/lib/perl5
+
+ touch $@
+
+binary-arch:
+# We have nothing to do here for an architecture-dependent package
+
+binary-indep: build install
+ dh_testdir
+ dh_testroot
+ dh_installexamples
+ dh_installdocs
+ dh_installchangelogs
+ dh_perl
+ dh_compress
+ dh_fixperms
+ dh_installdeb
+ dh_gencontrol
+ dh_md5sums
+ dh_builddeb
+
+source diff:
+ @echo >&2 'source and diff are obsolete - use dpkg-source -b'; false
+
+binary: binary-indep binary-arch
+.PHONY: build clean binary-indep binary-arch binary
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libxray-spacegroup-perl.git
More information about the Pkg-perl-cvs-commits
mailing list