diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-23 17:08:31 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-23 17:08:31 +0000 |
commit | a5b3542311a661393000cf5958d4b96624f4ef77 (patch) | |
tree | 6341ecd75b324863d8dd9da81c3027b2f665d16f | |
parent | 076988851d1cdb6cc455615593d7b9380b21955a (diff) | |
download | perl-a5b3542311a661393000cf5958d4b96624f4ef77.tar.gz |
The basic.cap from podlators 1.14 is not very portable.
p4raw-id: //depot/perl@13207
-rw-r--r-- | MANIFEST | 1 | ||||
-rw-r--r-- | lib/Pod/t/basic.cap | 283 |
2 files changed, 0 insertions, 284 deletions
@@ -1168,7 +1168,6 @@ lib/Pod/Parser.pm Pod-Parser - define base class for parsing POD lib/Pod/ParseUtils.pm Pod-Parser - pod utility functions lib/Pod/Plainer.pm Pod migration utility module lib/Pod/Select.pm Pod-Parser - select portions of POD docs -lib/Pod/t/basic.cap podlators test lib/Pod/t/basic.clr podlators test lib/Pod/t/basic.man podlators test lib/Pod/t/basic.ovr podlators test diff --git a/lib/Pod/t/basic.cap b/lib/Pod/t/basic.cap deleted file mode 100644 index 21f38baa2f..0000000000 --- a/lib/Pod/t/basic.cap +++ /dev/null @@ -1,283 +0,0 @@ -[1mNAME[m - basic.pod - Test of various basic POD features in translators. - -[1mHEADINGS[m - Try a few different levels of headings, with embedded formatting codes and - other interesting bits. - -[1mThis "is" a "level 1" heading[m - [1m``Level'' "2 [4mheading[m[m - Level 3 [1mheading [4mwith "weird stuff "" (double quote)"[m[m - Level "4 "heading" - Now try again with [1mintermixed[m text. - -[1mThis "is" a "level 1" heading[m - Text. - - [1m``Level'' 2 [4mheading[m[m - Text. - - Level 3 [1mheading [4mwith "weird stuff"[m[m - Text. - - Level "4 "heading" - Text. - -[1mLINKS[m - These are all taken from the Pod::Parser tests. - - Try out [4mLOTS[m of different ways of specifying references: - - Reference the "section" in manpage - - Reference the "section" in manpage - - Reference the "section" in manpage - - Reference the "section" in manpage - - Reference the "manpage/section" - - Reference the "section" in "manpage" - - Reference the "section" in manpage - - Reference the "section" in manpage - - Reference the "section" in manpage - - Now try it using the new "|" stuff ... - - Reference the thistext| - - Reference the thistext | - - Reference the thistext| - - Reference the thistext | - - Reference the thistext| - - Reference the thistext | - - Reference the thistext| - - Reference the thistext| - - Reference the thistext | - - And then throw in a few new ones of my own. - - foo - - foo - - "bar" in foo - - "baz boo" in foo - - "bar" - - "baz boo" - - "baz boo" - - "baz boo" in foo bar - - "baz boo" in foo bar - - "boo" in foo bar baz - - "boo var baz" - - "bar baz" - - "boo bar baz / baz boo" - - "boo", "bar", and "baz" - - foobar - - Testing [4mitalics[m - - "[4mItalic[m text" in foo - - "Section "with" [4m[1mother[m markup[m" in foo|bar - - Nested <http://www.perl.org/> - -[1mOVER AND ITEMS[m - Taken from Pod::Parser tests, this is a test to ensure that multiline - =item paragraphs get indented appropriately. - - This is a test. - - There should be whitespace now before this line. - - Taken from Pod::Parser tests, this is a test to ensure the nested =item - paragraphs get indented appropriately. - - 1 First section. - - a this is item a - - b this is item b - - 2 Second section. - - a this is item a - - b this is item b - - c - d This is item c & d. - - Now some additional weirdness of our own. Make sure that multiple tags for - one paragraph are properly compacted. - - "foo" - [1mbar[m - "baz" - There shouldn't be any spaces between any of these item tags; this - idiom is used in perlfunc. - - Some longer item text - Just to make sure that we test paragraphs where the item text doesn't - fit in the margin of the paragraph (and make sure that this paragraph - fills a few lines). - - Let's also make it multiple paragraphs to be sure that works. - - Test use of =over without =item as a block "quote" or block paragraph. - - This should be indented four spaces but otherwise formatted the same - as any other regular text paragraph. Make sure it's long enough to see - the results of the formatting..... - - Now try the same thing nested, and make sure that the indentation is reset - back properly. - - This paragraph should be doubly indented. - - This paragraph should only be singly indented. - - * This is an item in the middle of a block-quote, which should be - allowed. - - * We're also testing tagless item commands. - - Should be back to the single level of indentation. - - Should be back to regular indentation. - - Now also check the transformation of * into real bullets for man pages. - - * An item. We're also testing using =over without a number, and making - sure that item text wraps properly. - - * Another item. - - and now test the numbering of item blocks. - - 1. First item. - - 2. Second item. - -[1mFORMATTING CODES[m - Another test taken from Pod::Parser. - - This is a test to see if I can do not only $self and "method()", but also - "$self->method()" and "$self->{FIELDNAME}" and "$Foo <=> $Bar" without - resorting to escape sequences. If I want to refer to the right-shift - operator I can do something like "$x >> 3" or even "$y >> 5". - - Now for the grand finale of "$self->method()->{FIELDNAME} = {FOO=>BAR}". - And I also want to make sure that newlines work like this "$self->{FOOBAR} - >> 3 and [$b => $a]->[$a <=> $b]" - - Of course I should still be able to do all this [4mwith[m escape sequences too: - "$self->method()" and "$self->{FIELDNAME}" and "{FOO=>BAR}". - - Dont forget "$self->method()->{FIELDNAME} = {FOO=>BAR}". - - And make sure that 0 works too! - - Now, if I use << or >> as my delimiters, then I have to use whitespace. So - things like "<$self-"method()>> and "<$self-"{FIELDNAME}>> wont end up - doing what you might expect since the first > will still terminate the - first < seen. - - Lets make sure these work for empty ones too, like and ">>" (just to be - obnoxious) - - The statement: "This is dog kind's [4mfinest[m hour!" is a parody of a - quotation from Winston Churchill. - - The following tests are added to those: - - Make sure that a few other odd [4mthings[m still work. This should be a - vertical bar: |. Here's a test of a few more special escapes that have to - be supported: - - & An ampersand. - - ' An apostrophe. - - < A less-than sign. - - > A greater-than sign. - - " A double quotation mark. - - / A forward slash. - - Try to get this bit of text over towards the edge so - |that all of this text inside S<> won't| be wrapped. Also test the - |same thing with non-breaking spaces.| - - There is a soft hyphen in hyphen at hy-phen. - - This is a test of an index entry. - -[1mVERBATIM[m - Throw in a few verbatim paragraphs. - - use Term::ANSIColor; - print color 'bold blue'; - print "This text is bold blue.\n"; - print color 'reset'; - print "This text is normal.\n"; - print colored ("Yellow on magenta.\n", 'yellow on_magenta'); - print "This text is normal.\n"; - print colored ['yellow on_magenta'], "Yellow on magenta.\n"; - - use Term::ANSIColor qw(uncolor); - print uncolor '01;31', "\n"; - - But this isn't verbatim (make sure it wraps properly), and the next - paragraph is again: - - use Term::ANSIColor qw(:constants); - print BOLD, BLUE, "This text is in bold blue.\n", RESET; - - use Term::ANSIColor qw(:constants); $Term::ANSIColor::AUTORESET = 1; print BOLD BLUE "This text is in bold blue.\n"; print "This text is normal.\n"; - - (Ugh, that's obnoxiously long.) Try different spacing: - - Starting with a tab. - Not - starting - with - a - tab. But this should still be verbatim. - As should this. - - This isn't. - - This is. And this: is an internal tab. It should be: - |--| <= lined up with that. - - (Tricky, but tabs should be expanded before the translator starts in on - the text since otherwise text with mixed tabs and spaces will get messed - up.) - |