r71707 - in /trunk/libtext-format-perl: ./ debian/ debian/source/ inc/ lib/Text/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sat Mar 19 14:11:00 UTC 2011
Author: jawnsy-guest
Date: Sat Mar 19 14:07:36 2011
New Revision: 71707
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71707
Log:
* Use short debhelper rules format
* Bump to debhelper compat 8
* Refresh copyright to DEP5
* Use new 3.0 (quilt) source format
* No longer install README (removed upstream)
* Remove remnants of debhelper 5 (.install file)
* Add myself to Uploaders and Copyright
* Rewrite control description
* Standards-Version 3.9.1 (refer to GPL-1 specifically)
* Email change: gregor herrmann -> gregoa at debian.org
Added:
trunk/libtext-format-perl/Build.PL
- copied unchanged from r71676, branches/upstream/libtext-format-perl/current/Build.PL
trunk/libtext-format-perl/META.yml
- copied unchanged from r71676, branches/upstream/libtext-format-perl/current/META.yml
trunk/libtext-format-perl/debian/source/
trunk/libtext-format-perl/debian/source/format
trunk/libtext-format-perl/inc/
- copied from r71676, branches/upstream/libtext-format-perl/current/inc/
Removed:
trunk/libtext-format-perl/README
trunk/libtext-format-perl/debian/libtext-format-perl.docs
trunk/libtext-format-perl/debian/libtext-format-perl.install
Modified:
trunk/libtext-format-perl/Changes
trunk/libtext-format-perl/MANIFEST
trunk/libtext-format-perl/Makefile.PL
trunk/libtext-format-perl/debian/changelog
trunk/libtext-format-perl/debian/compat
trunk/libtext-format-perl/debian/control
trunk/libtext-format-perl/debian/copyright
trunk/libtext-format-perl/debian/rules
trunk/libtext-format-perl/lib/Text/Format.pm
Modified: trunk/libtext-format-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/Changes?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/Changes (original)
+++ trunk/libtext-format-perl/Changes Sat Mar 19 14:07:36 2011
@@ -1,4 +1,11 @@
Revision history for Perl extension Text::Format.
+
+0.53 Fri Jan 28 13:02:01 IST 2011
+ - Adopted by Shlomi Fish (while disclaiming all rights).
+ - Convert the build system to Module-Build, while adding keywords
+ and resources.
+ - The archive name is now the more standard Text-Format-0.53.tar.gz.
+ - Fix some typos in the documentation.
0.52 Sun Mar 29 11:32:50 1998
- fixed some warnings that appeared when using hanging indents
Modified: trunk/libtext-format-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/MANIFEST?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/MANIFEST (original)
+++ trunk/libtext-format-perl/MANIFEST Sat Mar 19 14:07:36 2011
@@ -1,6 +1,9 @@
+Build.PL
Changes
+inc/Test/Run/Builder.pm
lib/Text/Format.pm
t/format.t
t/justify.t
MANIFEST
Makefile.PL
+META.yml
Modified: trunk/libtext-format-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/Makefile.PL?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/Makefile.PL (original)
+++ trunk/libtext-format-perl/Makefile.PL Sat Mar 19 14:07:36 2011
@@ -1,7 +1,18 @@
+# Note: this file was auto-generated by Module::Build::Compat version 0.36_17
use ExtUtils::MakeMaker;
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
-WriteMakefile(
- 'NAME' => 'Text::Format',
- 'VERSION_FROM' => './lib/Text/Format.pm',
-);
+WriteMakefile
+(
+ 'NAME' => 'Text::Format',
+ 'VERSION_FROM' => 'lib/Text/Format.pm',
+ 'PREREQ_PM' => {
+ 'Carp' => 0,
+ 'Test::More' => 0,
+ 'strict' => 0,
+ 'vars' => 0,
+ 'warnings' => 0
+ },
+ 'INSTALLDIRS' => 'site',
+ 'EXE_FILES' => [],
+ 'PL_FILES' => {}
+ )
+;
Modified: trunk/libtext-format-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/debian/changelog?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/debian/changelog (original)
+++ trunk/libtext-format-perl/debian/changelog Sat Mar 19 14:07:36 2011
@@ -2,6 +2,16 @@
[ Jonathan Yu ]
* New upstream release
+ * Use short debhelper rules format
+ * Bump to debhelper compat 8
+ * Refresh copyright to DEP5
+ * Use new 3.0 (quilt) source format
+ * No longer install README (removed upstream)
+ * Remove remnants of debhelper 5 (.install file)
+ * Add myself to Uploaders and Copyright
+ * Rewrite control description
+ * Standards-Version 3.9.1 (refer to GPL-1 specifically)
+ * Email change: gregor herrmann -> gregoa at debian.org
[ gregor herrmann ]
* debian/control: Added: Vcs-Svn field (source stanza); Vcs-Browser
@@ -14,7 +24,7 @@
[ MartÃn Ferrari ]
* debian/watch: modified to avoid seeing strange Text-Format+NWrap dist.
- -- Jonathan Yu <jawnsy at cpan.org> Fri, 18 Mar 2011 22:26:32 -0400
+ -- Jonathan Yu <jawnsy at cpan.org> Sat, 19 Mar 2011 10:27:06 -0400
libtext-format-perl (0.52-21) unstable; urgency=low
Modified: trunk/libtext-format-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/debian/compat?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/debian/compat (original)
+++ trunk/libtext-format-perl/debian/compat Sat Mar 19 14:07:36 2011
@@ -1,1 +1,1 @@
-5
+8
Modified: trunk/libtext-format-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/debian/control?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/debian/control (original)
+++ trunk/libtext-format-perl/debian/control Sat Mar 19 14:07:36 2011
@@ -1,38 +1,23 @@
Source: libtext-format-perl
Section: perl
Priority: optional
+Build-Depends: debhelper (>= 8)
+Build-Depends-Indep: perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Daniel Ruoso <daniel at ruoso.com>,
+ Jonathan Yu <jawnsy at cpan.org>,
gregor herrmann <gregoa at debian.org>
-Standards-Version: 3.7.2
+Standards-Version: 3.9.1
Homepage: http://search.cpan.org/dist/Text-Format/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libtext-format-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libtext-format-perl/
-Build-Depends: debhelper (>= 5.0.0)
-Build-Depends-Indep: perl
Package: libtext-format-perl
-Section: perl
-Priority: optional
Architecture: all
Depends: ${misc:Depends}, ${perl:Depends}
-Description: Perl module for formatting (text) paragraphs
- This module provides the following functions:
- .
- format() Format text into a paragraph. Text is first broken into
- words and then joined back together to make up the
- paragraph. There are numerous attributes you can set to
- your liking.
- .
- paragraphs() Treats each element of the array passed in as a separate
- paragraph and passes them to format() for formatting.
- The list returned will be then formatted into separate
- paragraphs.
- .
- center() Centers all the lines that were passed in.
- .
- expand() Expand tabs into spaces.
- .
- unexpand() Turn spaces into tabs. First calls expand() to expand
- tabs into spaces and then turns tabstop number of spaces
- into tabs, you can set tabstop size with tabstop().
+Description: module for formatting plain text
+ Text::Format is a Perl module that provides various utility functions for
+ formatting plain text. This module is similar to, but more powerful than,
+ the Text::Wrap module (in Perl core). It can format arbitrary lines into
+ paragraphs, center text, handle indentation and left/right margins, and
+ convert between tabs and spaces.
Modified: trunk/libtext-format-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/debian/copyright?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/debian/copyright (original)
+++ trunk/libtext-format-perl/debian/copyright Sat Mar 19 14:07:36 2011
@@ -1,27 +1,33 @@
-This package was debianized by Ardo van Rangelrooij <ardo at debian.org>
-on Sat, May 15, 1999, 08:42:41 +0200.
+Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Maintainer: Shlomi Fish <shlomif at cpan.org>
+Source: http://search.cpan.org/dist/Text-Format/
+Name: Text-Format
-It was downloaded from the Comprehensive Perl Archive Network (CPAN).
-Visit <http://www.cpan.org/> to find a CPAN site near you.
+Files: *
+Copyright: 1998, Gabor Egressy <gabor at vmunix.com>
+License: Artistic or GPL-1+
-Upstream Author: Gabor Egressy <gabor at vmunix.com>
+Files: debian/*
+Copyright: 1999-2004, Ardo van Rangelrooij <ardo at debian.org>
+ 2004, Daniel Ruoso <daniel at ruoso.com>
+ 2006, gregor herrmann <gregoa at debian.org>
+ 2011, Jonathan Yu <jawnsy at cpan.org>
+License: Artistic or GPL-1+
+ It is assumed the Debian packagers licensed their work under the
+ same terms as upstream.
-Copyright:
+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 systems, the complete text of the Artistic License can be
+ found in `/usr/share/common-licenses/Artistic'.
-Copyright (c) 1998 Gabor Egressy <gabor at vmunix.com>.
-
-All rights reserved. All wrongs reversed.
-
-This program is free software; you can redistribute it and/or modify
-it under the terms of either:
-
-a) the GNU General Public License as published by the Free Software
- Foundation; either version 1, or (at your option) any later
- version, or
-
-b) the "Artistic License" which comes with Perl.
-
-On a Debian system the complete text of the GNU General Public License
-can be found in the file `/usr/share/common-licenses/GPL' and the
-complete text of the the Artistic Licence can be found in the file
-`/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 systems, the complete text of version 1 of the GNU General
+ Public License can be found in `/usr/share/common-licenses/GPL-1'.
Modified: trunk/libtext-format-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/debian/rules?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/debian/rules (original)
+++ trunk/libtext-format-perl/debian/rules Sat Mar 19 14:07:36 2011
@@ -1,60 +1,4 @@
#!/usr/bin/make -f
-## ----------------------------------------------------------------------
-## debian/rules : package script for libtext-format-perl
-## ----------------------------------------------------------------------
-## ----------------------------------------------------------------------
-## uncomment this to turn on verbose mode
-#export DH_VERBOSE=1
-
-## ----------------------------------------------------------------------
-TMP_DIR = debian/tmp
-
-## ----------------------------------------------------------------------
-## targets
-
-clean:
- dh_testdir
- dh_testroot
- [ ! -f Makefile ] || $(MAKE) realclean
- dh_clean
- rm -f build-stamp install-stamp
-
-build: build-stamp
-build-stamp:
- dh_testdir
- perl Makefile.PL INSTALLDIRS=vendor
- $(MAKE) OPTIMIZE="-O2 -g -Wall"
- $(MAKE) test
- touch build-stamp
-
-install: install-stamp
-install-stamp: build
- dh_testdir
- dh_testroot
- dh_clean -k
- dh_installdirs
- $(MAKE) install PREFIX=$(CURDIR)/$(TMP_DIR)/usr
- touch install-stamp
-
-binary-indep: build install
- dh_testdir
- dh_testroot
- dh_install --sourcedir=$(TMP_DIR)
- dh_installdocs
- dh_installchangelogs Changes
- dh_compress
- dh_fixperms
- dh_installdeb
- dh_perl
- dh_gencontrol
- dh_md5sums
- dh_builddeb
-
-binary-arch:
-
-binary: binary-indep binary-arch
-
-.PHONY: clean build install binary-indep binary-arch binary
-
-## ----------------------------------------------------------------------
+%:
+ dh $@
Added: trunk/libtext-format-perl/debian/source/format
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/debian/source/format?rev=71707&op=file
==============================================================================
--- trunk/libtext-format-perl/debian/source/format (added)
+++ trunk/libtext-format-perl/debian/source/format Sat Mar 19 14:07:36 2011
@@ -1,0 +1,1 @@
+3.0 (quilt)
Modified: trunk/libtext-format-perl/lib/Text/Format.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-format-perl/lib/Text/Format.pm?rev=71707&op=diff
==============================================================================
--- trunk/libtext-format-perl/lib/Text/Format.pm (original)
+++ trunk/libtext-format-perl/lib/Text/Format.pm Sat Mar 19 14:07:36 2011
@@ -9,7 +9,7 @@
use Text::Format;
- $text = Text::Format->new (
+ my $text = Text::Format->new (
{
text => [], # all
columns => 72, # format, paragraphs, center
@@ -30,7 +30,7 @@
}
); # these are the default values
- %abbr = (foo => 1, bar => 1);
+ my %abbr = (foo => 1, bar => 1);
$text->abbrevs(\%abbr);
$text->abbrevs();
$text->abbrevs({foo => 1,bar => 1});
@@ -57,7 +57,8 @@
aligned. There is a chance for croaking if you try to subvert the
module. If you don't pass in text then the internal text is worked on,
though not modfied.
-I<Text::Format> is meant for more powerful text formatting than
+
+I<Text::Format> is meant for more powerful text formatting than what
I<Text::Wrap> allows. I also have a module called I<Text::NWrap> that
is meant as a direct replacement for I<Text::Wrap>. I<Text::NWrap>
requires I<Text::Format> since it uses I<Text::Format-E<gt>format> to do the
@@ -121,7 +122,7 @@
=item B<new> \%HASH || NOTHING
Instantiates the object. If you pass a reference to a hash, or an
-anonymous hash then it's used in setting attributes.
+anonymous hash then it is used in setting attributes.
=item B<config> \%HASH
@@ -205,7 +206,7 @@
=item B<noBreakRegex> \%HASH || NOTHING
Pass in a reference to your hash that would hold the regexes on which not
-to break. Returns the hash.
+to break. Without any arguments, it returns the hash.
eg.
{'^Mrs?\.$' => '^\S+$','^\S+$' => '^(?:S|J)r\.$'}
@@ -240,19 +241,23 @@
use Text::Format;
- $text = new Text::Format;
+ my $text = Text::Format->new;
+
$text->rightFill(1);
$text->columns(65);
$text->tabstop(4);
+
print $text->format("a line to format to an indented regular
paragraph using 65 character wide display");
print $text->paragraphs("paragraph one","paragraph two");
print $text->center("hello world","nifty line 2");
print $text->expand("\t\thello world\n","hmm,\twell\n");
print $text->unexpand(" hello world\n"," hmm");
+
$text->config({columns => 132, tabstop => 4});
$text = Text::Format->new();
+
print $text->format(@text);
print $text->paragraphs(@text);
print $text->center(@text);
@@ -264,6 +269,7 @@
$text = Text::Format->new
({tabstop => 4,bodyIndent => 4,text => \@text});
+
print $text->format();
print $text->paragraphs();
print $text->center();
@@ -274,10 +280,10 @@
=head1 BUGS
-Line length can exceed columns specified if columns is set to a small
-number and long words plus leading whitespace exceed column length
-specified. Actually I see this as a feature since it can be used to
-make up a nice word list.
+Line length can exceed the number of specified columns
+if columns is set to a small number and long words plus leading whitespace
+exceed the specified column length. Actually I see this as a feature since it
+can be used to make up a nice word list.
=head1 AUTHOR
@@ -287,23 +293,31 @@
reversed. This program is free software; you can redistribute and/or
modify it under the same terms as Perl itself.
+Adopted and modified by Shlomi Fish, L<http://www.shlomifish.org/> - all
+rights disclaimed.
+
=head1 ACKNOWLEDGMENTS
B<Tom Phoenix>
-found bug with code for two spaces at end of sentence and provided code
-fragment for a better solution, some preliminary suggestions on design
+
+Found a bug with code for two spaces at the end of the sentence and provided
+a code fragment for a better solution. Also some preliminary suggestions on
+the design.
B<Brad Appleton>
-suggesting and explanation of hanging indents, suggestion for
+
+Suggestion and explanation of hanging indents, suggestion for
non-breaking whitespace, general suggestions with regard to interface
-design
+design.
B<Byron Brummer>
-suggestion for better interface design and object design, code for
-better implementation of getting abbreviations
+
+Suggestion for better interface design and object design, code for
+better implementation of getting abbreviations.
B<H. Merijn Brand>
-suggestion for justify feature and original code for doing the
+
+Suggestion for a justify feature and original code for doing the
justification. I changed the code to take into account the extra space
at end of sentence feature.
@@ -315,7 +329,7 @@
use strict;
use vars qw($VERSION);
-$VERSION = '0.52';
+$VERSION = '0.53';
# local abbreviations, you can add your own with abbrevs()
my %abbrev = (
More information about the Pkg-perl-cvs-commits
mailing list