r23078 - in /trunk/libtext-markdown-perl/debian: changelog patches/add_missing_pod patches/pod_name patches/series
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Sat Jul 12 15:54:07 UTC 2008
Author: gregoa
Date: Sat Jul 12 15:54:06 2008
New Revision: 23078
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=23078
Log:
Rename add_missing_pod to pod_name: the POD itself is integrated in the
upstream code, only the names of the scripts have to be changed.
Added:
trunk/libtext-markdown-perl/debian/patches/pod_name
- copied, changed from r23075, trunk/libtext-markdown-perl/debian/patches/add_missing_pod
Removed:
trunk/libtext-markdown-perl/debian/patches/add_missing_pod
Modified:
trunk/libtext-markdown-perl/debian/changelog
trunk/libtext-markdown-perl/debian/patches/series
Modified: trunk/libtext-markdown-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-markdown-perl/debian/changelog?rev=23078&op=diff
==============================================================================
--- trunk/libtext-markdown-perl/debian/changelog (original)
+++ trunk/libtext-markdown-perl/debian/changelog Sat Jul 12 15:54:06 2008
@@ -1,6 +1,8 @@
libtext-markdown-perl (1.0.20-1) UNRELEASED; urgency=low
* New upstream release.
+ * Rename add_missing_pod to pod_name: the POD itself is integrated in the
+ upstream code, only the names of the scripts have to be changed.
-- gregor herrmann <gregoa at debian.org> Sat, 12 Jul 2008 17:36:47 +0200
Copied: trunk/libtext-markdown-perl/debian/patches/pod_name (from r23075, trunk/libtext-markdown-perl/debian/patches/add_missing_pod)
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-markdown-perl/debian/patches/pod_name?rev=23078&op=diff
==============================================================================
--- trunk/libtext-markdown-perl/debian/patches/add_missing_pod (original)
+++ trunk/libtext-markdown-perl/debian/patches/pod_name Sat Jul 12 15:54:06 2008
@@ -1,224 +1,39 @@
--- a/script/Markdown.pl
+++ b/script/Markdown.pl
-@@ -3,6 +3,89 @@ use strict;
- use warnings;
- use Text::Markdown qw(markdown);
+@@ -5,7 +5,7 @@
-+=head1 NAME
-+
+ =head1 NAME
+
+-Markdown.pl - Convert Markdown syntax to (X)HTML
+markdown - Convert Markdown syntax to (X)HTML
-+
-+=head1 DESCRIPTION
-+
-+This program is distributed as part of Perl's Text::Markdown module,
-+illustrating sample usage.
-+
-+Markdown can be invoked on any file containing Markdown-syntax, and
-+will produce the corresponding (X)HTML on STDOUT:
-+
-+ $ cat file.txt
-+ This is a *test*.
-+
-+ Absolutely _nothing_ to see here. _Just a **test**_!
-+
-+ * test
-+ * Yup, test.
+
+ =head1 DESCRIPTION
+
+@@ -22,7 +22,7 @@
+
+ * test
+ * Yup, test.
+- $ Markdown.pl file.txt
+ $ markdown file.txt
-+ <p>This is a <em>test</em>.</p>
-+
-+ <p>Absolutely <em>nothing</em> to see here. <em>Just a <strong>test</strong></em>!</p>
-+
-+ <ul>
-+ <li>test</li>
-+ <li>Yup, test.</li>
-+ </ul>
-+
-+If no file is specified, it will expect its input from STDIN:
-+
-+ $ echo "A **simple** test" | markdown
-+ <p>A <strong>simple</strong> test</p>
-+
-+=head1 OPTIONS
-+
-+=over
-+
-+=item version
-+
-+Shows the full information for this version
-+
-+=item shortversion
-+
-+Shows only the version number
-+
-+=item html4tags
-+
-+Produce HTML 4-style tags instead of XHTML - XHTML requires elements
-+that do not wrap a block (i.e. the C<hr> tag) to state they will not
-+be closed, by closing with C</E<gt>>. HTML 4-style will plainly output
-+the tag as it comes:
-+
-+ $ echo '---' | markdown
-+ <hr />
-+ $ echo '---' | markdown --html4tags
-+ <hr>
-+
-+=item help
-+
-+Shows this documentation
-+
-+=back
-+
-+=head1 AUTHOR
-+
-+Copyright 2004 John Gruber
-+
-+Copyright 2008 Tomas Doran
-+
-+The manpage was written by Gunnar Wolf <gwolf at debian.org> for its use
-+in Debian systems, but can be freely used elsewhere.
-+
-+For full licensing information, please refer to
-+L<Text::MultiMarkdown.pm>'s full documentation, or -in Debian systems-
-+to L</usr/share/doc/libtext-markdown-perl/copyright>
-+
-+=head1 SEE ALSO
-+
-+L<Text::Markdown>, L<http://daringfireball.net/projects/markdown/>
-+
-+=cut
-+
- #### Check for command-line switches: #################
- my %cli_opts;
- use Getopt::Long;
-@@ -25,7 +108,13 @@ if ($cli_opts{'shortversion'}) {
- print $Text::Markdown::VERSION;
- exit 0;
- }
--
-+if ($cli_opts{'help'}) {
-+ for my $dir (split m/:/, $ENV{PATH}) {
-+ my $cmd = "$dir/perldoc";
-+ exec($cmd, $0) if (-f $cmd and -x $cmd);
-+ }
-+ die "perldoc could not be found in your path - Cannot show help, sorry\n";
-+}
- my $m;
- if ($cli_opts{'html4tags'}) { # Use HTML tag style instead of XHTML
- $m = Text::Markdown->new(empty_element_suffix => '>');
+ <p>This is a <em>test</em>.</p>
+
+ <p>Absolutely <em>nothing</em> to see here. <em>Just a <strong>test</strong></em>!</p>
--- a/script/MultiMarkdown.pl
+++ b/script/MultiMarkdown.pl
-@@ -3,6 +3,84 @@ use strict;
- use warnings;
- use Text::MultiMarkdown qw(markdown);
+@@ -5,14 +5,14 @@
-+=head1 NAME
-+
+ =head1 NAME
+
+-MultimMarkdown.pl - Convert MultiMarkdown syntax to (X)HTML
+multimarkdown - Convert MultiMarkdown syntax to (X)HTML
-+
-+=head1 DESCRIPTION
-+
-+This program is distributed as part of Perl's Text::MultiMarkdown module,
-+illustrating sample usage.
-+
+
+ =head1 DESCRIPTION
+
+ This program is distributed as part of Perl's Text::MultiMarkdown module,
+ illustrating sample usage.
+
+-MultiMarkdown.pl can be invoked on any file containing MultiMarkdown-syntax, and
+MultiMarkdown can be invoked on any file containing MultiMarkdown-syntax, and
-+will produce the corresponding (X)HTML on STDOUT:
-+
-+ $ cat file.txt
-+ [MultiMarkdown][] *extends* the very well-known [Markdown][] syntax.
-+
-+ [MultiMarkdown]: http://fletcherpenney.net/What_is_MultiMarkdown
-+ [Markdown]: http://daringfireball.net/projects/markdown/
-+
-+ $ multimarkdown file.txt
-+ <p><a href="http://fletcherpenney.net/What_is_MultiMarkdown">MultiMarkdown</a> <em>extends</em> the very well-known <a href="http://daringfireball.net/projects/markdown/">Markdown</a> syntax.</p>
-+
-+
-+If no file is specified, it will expect its input from STDIN:
-+
-+ $ echo "A **simple** test" | multimarkdown
-+ <p>A <strong>simple</strong> test</p>
-+
-+=head1 OPTIONS
-+
-+=over
-+
-+=item version
-+
-+Shows the full information for this version
-+
-+=item shortversion
-+
-+Shows only the version number
-+
-+=item html4tags
-+
-+Produce HTML 4-style tags instead of XHTML - XHTML requires elements
-+that do not wrap a block (i.e. the C<hr> tag) to state they will not
-+be closed, by closing with C</E<gt>>. HTML 4-style will plainly output
-+the tag as it comes:
-+
-+ $ echo '---' | multimarkdown
-+ <hr />
-+ $ echo '---' | multimarkdown --html4tags
-+ <hr>
-+
-+=item help
-+
-+Shows this documentation
-+
-+=back
-+
-+=head1 AUTHOR
-+
-+Copyright 2004 John Gruber
-+
-+Copyright 2006 Fletcher Penny
-+
-+Copyright 2008 Tomas Doran
-+
-+The manpage was written by Gunnar Wolf <gwolf at debian.org> for its use
-+in Debian systems, but can be freely used elsewhere.
-+
-+For full licensing information, please refer to
-+Text::MultiMarkdown.pm's full documentation, or -in Debian systems- to
-+L</usr/share/doc/libtext-markdown-perl/copyright>
-+
-+=head1 SEE ALSO
-+
-+L<Text::MultiMarkdown>, L<http://fletcherpenney.net/What_is_MultiMarkdown>
-+
-+=cut
-+
- #### Check for command-line switches: #################
- my %cli_opts;
- use Getopt::Long;
-@@ -11,6 +89,7 @@ GetOptions(\%cli_opts,
- 'version',
- 'shortversion',
- 'html4tags',
-+ 'help'
- );
- if ($cli_opts{'version'}) { # Version info
- print "\nThis is MultiMarkdown, version $Text::MultiMarkdown::VERSION.\n";
-@@ -25,7 +104,13 @@ if ($cli_opts{'shortversion'}) {
- print $Text::MultiMarkdown::VERSION;
- exit 0;
- }
--
-+if ($cli_opts{'help'}) {
-+ for my $dir (split m/:/, $ENV{PATH}) {
-+ my $cmd = "$dir/perldoc";
-+ exec($cmd, $0) if (-f $cmd and -x $cmd);
-+ }
-+ die "perldoc could not be found in your path - Cannot show help, sorry\n";
-+}
- my $m;
- if ($cli_opts{'html4tags'}) { # Use HTML tag style instead of XHTML
- $m = Text::MultiMarkdown->new(empty_element_suffix => '>');
-@@ -54,4 +139,4 @@ sub main {
- return $m->markdown($f);
- }
+ will produce the corresponding (X)HTML on STDOUT:
--print main(shift(@ARGV)) unless caller();
-\ No newline at end of file
-+print main(shift(@ARGV)) unless caller();
+ $ cat file.txt
Modified: trunk/libtext-markdown-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtext-markdown-perl/debian/patches/series?rev=23078&op=diff
==============================================================================
--- trunk/libtext-markdown-perl/debian/patches/series (original)
+++ trunk/libtext-markdown-perl/debian/patches/series Sat Jul 12 15:54:06 2008
@@ -1,1 +1,1 @@
-add_missing_pod
+pod_name
More information about the Pkg-perl-cvs-commits
mailing list