More formatting fixes

Author: Jan-Olof Hendig

doc/Language/control.pod6

@@ -877,7 +877,6 @@ for @x -> $x {
     next if $x == 3;
     print $x;
 }
-
 =end code
 
 prints "1245".
@@ -893,7 +892,6 @@ for @x -> $x {
     last if $x == 3;
     print $x;
 }
-
 =end code
 
 prints "12".
@@ -923,7 +921,6 @@ multi indent-say ( 'test' ) {
 multi indent-say ( Str $string ) {
     say "\t$string";
 }
-
 =end code
 
 =end pod

doc/Language/exceptions.pod6

@@ -167,8 +167,8 @@ the expression or L<Nil|/type/Nil> if an exception was thrown.
 C<try> can also be used with a statement instead of a block:
 
 =begin code
-    say try "some-filename.txt".IO.slurp // "sane default";
-    # OUTPUT: «sane default␤»
+say try "some-filename.txt".IO.slurp // "sane default";
+# OUTPUT: «sane default␤»
 =end code
 
 =head1 Throwing exceptions

doc/Language/functions.pod6

@@ -929,9 +929,7 @@ set to a truthy value, named arguments can be specified anywhere, even after
 positional parameter. For example, the above program can be called with:
 
 =begin code :lang<shell>
-
-    perl6 example.p6 1 --c=2 3 --d=4
-
+perl6 example.p6 1 --c=2 3 --d=4
 =end code
 
 =head1 C<sub USAGE>

doc/Language/nativecall.pod6

@@ -371,7 +371,7 @@ class MyStruct2 is repr('CStruct') {
     has int32 $.flags;
 }
 
-    say nativesizeof(MyStruct2.new);  # 24, ie. sizeof(struct Point) + sizeof(int32_t)
+say nativesizeof(MyStruct2.new);  # 24, ie. sizeof(struct Point) + sizeof(int32_t)
 =end code
 
 =head1 Typed Pointers
@@ -600,9 +600,9 @@ sudo apt-get install mysql-server
 Prepare your system along these lines before trying out the examples:
 
 =for code :lang<shell>
-    $ mysql -u root -p
-    UPDATE mysql.user SET password=password('sa') WHERE user = 'root';
-    CREATE DATABASE test;
+$ mysql -u root -p
+UPDATE mysql.user SET password=password('sa') WHERE user = 'root';
+CREATE DATABASE test;
 
 =head2 Microsoft Windows
 

doc/Language/unicode_entry.pod6

@@ -39,10 +39,10 @@ You may have issues using the compose key in all programs. In that case you can
 try C<ibus>.
 
 =for code :lang<shell>
-    input_module=xim
-    export GTK_IM_MODULE=$input_module
-    export XMODIFIERS=@im=$input_module
-    export QT_IM_MODULE=$input_module
+input_module=xim
+export GTK_IM_MODULE=$input_module
+export XMODIFIERS=@im=$input_module
+export QT_IM_MODULE=$input_module
 
 If you want this to be for all users you can put this in a file C</etc/profile.d/compose.sh>,
 which is the easiest way, since you won't have to deal with how different GUI
@@ -60,7 +60,7 @@ package for your distribution. Then you will have to set it to start on load of
 Desktop environment. The command that needs to be run is:
 
 =for code :lang<shell>
-    ibus-daemon --xim --verbose --daemonize --replace
+ibus-daemon --xim --verbose --daemonize --replace
 
 Setting C<--xim> should also allow programs not using ibus to still use the xim
 input method and be backward compatible.