Remove extra identation for a great number of code examples due to :skip-test option

Author: Altai-man

doc/Language/about.pod6

@@ -45,14 +45,14 @@ highlighting
 Then, to generate the documentation into the C<html/> folder, run:
 
 =begin code :skip-test
-    perl6 htmlify.p6
+perl6 htmlify.p6
 =end code
 
 Currently, to serve the generated documentation for your browser, Perl 5
 with Mojolicious::Lite must be installed. Then run:
 
 =begin code :skip-test
-    perl app.pl daemon
+perl app.pl daemon
 =end code
 
 =head1 Contributing
@@ -67,7 +67,7 @@ next directive of the same level, will be considered part of the
 documentable. So, in:
 
 =begin code :allow<R> :skip-test
-=head2 R<My Definition>
+d2 R<My Definition>
 
 Some paragraphs, followed by some code:
 

doc/Type/Any.pod6

@@ -25,7 +25,7 @@ Defined as:
 Usage:
 
 =begin code :skip-test
-    EXPR.ACCEPTS(EXPR);
+EXPR.ACCEPTS(EXPR);
 =end code
 
 Returns C<True> if C<$other === self> (i.e. it checks object identity).
@@ -132,7 +132,7 @@ Examples:
 Defined as:
 
 =begin code :skip-test
-    proto method map(|) is nodal { * }
+proto method map(|) is nodal { * }
 =end code
     multi method map(\SELF: &block;; :$label, :$item)
     multi method map(HyperIterable:D: &block;; :$label)

doc/Type/Array.pod6

@@ -71,7 +71,7 @@ values that are stored in a single array.
 Defined as
 
 =begin code :skip-test
-    sub append(\array, elems)
+sub append(\array, elems)
 =end code
     multi method append(Array:D: \values)
     multi method append(Array:D: **@values is raw)
@@ -136,7 +136,7 @@ list or array.
 Defined as
 
 =begin code :skip-test
-    sub prepend(\array, elems)
+sub prepend(\array, elems)
 =end code
     multi method prepend(Array:D: \values)
     multi method prepend(Array:D: **@values is raw)

doc/Type/Blob.pod6

@@ -139,7 +139,7 @@ The following letters are recognized:
 This subroutine is considered B<experimental>,  in order to use it you will need to do:
 
 =begin code :skip-test
-    use experimental :pack;
+use experimental :pack;
     sub pack(Str $template, *@items) returns Buf
 =end code
 

doc/Type/Callable.pod6

@@ -20,8 +20,8 @@ container.
     sub foo() {};
     my &d = &foo;
 for code :skip-test
-    my &f:(Int) = sub bar(Int) {}; # Not yet implemented
-    my &f:(Str) = -> Str {};       # Not yet implemented
+my &f:(Int) = sub bar(Int) {}; # Not yet implemented
+my &f:(Str) = -> Str {};       # Not yet implemented
 
 =head1 Methods
 

doc/Type/Cancellation.pod6

@@ -23,7 +23,7 @@ Defined as:
 Usage:
 
 =begin code :skip-test
-    CANCELLATION.cancel
+CANCELLATION.cancel
 =end code
 
 Cancels the scheduled execution of a task before normal completion.

doc/Type/Capture.pod6

@@ -5,7 +5,7 @@
 =SUBTITLE Argument list suitable for passing to a L<Signature>
 
 =for code :skip-test
-    class Capture does Positional does Associative { }
+class Capture does Positional does Associative { }
 
 A Capture is a container for passing arguments to a code object.  Captures
 are the flip-side of Signatures -- Captures at the caller define arguments,

doc/Type/Complex.pod6

@@ -26,7 +26,7 @@ Adding a trailing C<i> to a number literal makes it a Complex, for example:
 Defined as:
 
 =begin code :skip-test
-    proto method new(*@, *%) {*} returns Complex:D
+proto method new(*@, *%) {*} returns Complex:D
 =end code
     multi method new(Real $re, Real $im) returns Complex:D
 

doc/Type/Cool.pod6

@@ -1020,8 +1020,8 @@ This method can be used as part of an C<IO::Path> to process a file
 line-by-line, since C<IO::Path> objects inherit from C<Cool>, e.g.:
 
 =begin code :skip-test
-for 'huge-csv'.IO.lines -> $line {
-        # Do something with $line
+'huge-csv'.IO.lines -> $line {
+    # Do something with $line
 }
 
 # or if you'll be processing later
@@ -1034,7 +1034,7 @@ C<$*ARGFILES>, which defaults to C<$*IN> in the absence of any filenames.
 To modify values in place use C<is copy> to force a writeable container.
 
 =for code :skip-test
-    for $*IN.lines -> $_ is copy { s/(\w+)/{$0 ~ $0}/; .say }
+for $*IN.lines -> $_ is copy { s/(\w+)/{$0 ~ $0}/; .say }
 
 =head2 method words
 
@@ -1159,7 +1159,7 @@ Defined as:
 Coerces the invocant to L<IO::Path>.
 
 =for code :skip-test
-    .say for '.'.IO.dir;        # gives a directory listing
+.say for '.'.IO.dir;        # gives a directory listing
 
 =head2 routine EVAL
 
@@ -1189,7 +1189,7 @@ However, since the set of symbols in a lexical scope is immutable after compile
 time, an EVAL can never introduce symbols into the surrounding scope.
 
 =for code :skip-test
-    EVAL 'my $lives = 9'; say $lives;   # error, $lives not declared
+EVAL 'my $lives = 9'; say $lives;   # error, $lives not declared
 
 Furthermore, the C<EVAL> is evaluated in the current package:
 
@@ -1215,7 +1215,7 @@ An C<EVAL> statement evaluates to the result of the last statement:
 C<EVAL> is also a gateway for executing code in other languages:
 
 =for code :skip-test
-    EVAL "use v5.20; say 'Hello from perl5!'", :lang<Perl5>;
+EVAL "use v5.20; say 'Hello from perl5!'", :lang<Perl5>;
 
 =head2 routine EVALFILE
 
@@ -1226,7 +1226,7 @@ Defined as:
 Usage:
 
 =for code :skip-test
-    EVALFILE "foo.p6";
+EVALFILE "foo.p6";
 
 Slurps the specified file and evaluates it. Behaves the same way as C<EVAL>
 with regard to both scoping and the C<$lang> parameter. Evaluates to the value

doc/Type/CurrentThreadScheduler.pod6

@@ -5,7 +5,7 @@
 =SUBTITLE Scheduler that blockingly executes code on the current thread
 
 =for code :skip-test
-    class CurrentThreadScheduler does Scheduler {}
+class CurrentThreadScheduler does Scheduler {}
 
 C<CurrentThreadScheduler> executes tasks on the current threads. This means
 that L<method cue|/type/Scheduler#method cue> blocks until the code has