Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Remove whitespace [Gun.io WhitespaceBot]

  • Loading branch information...
commit 67b372df8a7bfc2054b611e0abf2d554161c4330 1 parent 517255c
Gun.io Whitespace Robot authored
Showing with 26 additions and 26 deletions.
  1. +7 −7 LICENSE
  2. +1 −1  README
  3. +17 −17 lib/Druid/View/Text.pm
  4. +1 −1  lib/Druid/Webapp.pm
14 LICENSE
View
@@ -17,7 +17,7 @@ You are always permitted to make arrangements wholly outside of this
license directly with the Copyright Holder of a given Package. If the
terms of this license do not permit the full use that you propose to
make of the Package, you should contact the Copyright Holder and seek
-a different licensing arrangement.
+a different licensing arrangement.
Definitions
@@ -50,7 +50,7 @@ Definitions
"Modified Version" means the Package, if it has been changed, and
such changes were not explicitly requested by the Copyright
- Holder.
+ Holder.
"Original License" means this Artistic License as Distributed with
the Standard Version of the Package, in its current version or as
@@ -86,7 +86,7 @@ Package will still be considered the Standard Version, and as such
will be subject to the Original License.
-Distribution of Modified Versions of the Package as Source
+Distribution of Modified Versions of the Package as Source
(4) You may Distribute your Modified Version as Source (either gratis
or for a Distributor Fee, and with or without a Compiled form of the
@@ -108,7 +108,7 @@ you do at least ONE of the following:
(c) allow anyone who receives a copy of the Modified Version to
make the Source form of the Modified Version available to others
under
-
+
(i) the Original License or
(ii) a license that permits the licensee to freely copy,
@@ -120,7 +120,7 @@ you do at least ONE of the following:
Fees are allowed.
-Distribution of Compiled Forms of the Standard Version
+Distribution of Compiled Forms of the Standard Version
or Modified Versions without the Source
(5) You may Distribute Compiled forms of the Standard Version without
@@ -138,7 +138,7 @@ the Source, provided that you comply with Section 4 with respect to
the Source of the Modified Version.
-Aggregating or Linking the Package
+Aggregating or Linking the Package
(7) You may aggregate the Package (either the Standard Version or
Modified Version) with other packages and Distribute the resulting
@@ -155,7 +155,7 @@ include the Package, and Distribute the result without restriction,
provided the result does not expose a direct interface to the Package.
-Items That are Not Considered Part of a Modified Version
+Items That are Not Considered Part of a Modified Version
(9) Works (including, but not limited to, modules and scripts) that
merely extend or make use of the Package, do not, by themselves, cause
2  README
View
@@ -15,7 +15,7 @@ This is how a typical board might look:
+ /-----/ /| v v | +
2 | +-----+-----+-----+
| +-----/| h h h h h h |
- + /| v v || h h h h h h |
+ + /| v v || h h h h h h |
1 | || v v |+-----+-----+-----+
| |+-----/-----/-----/-----/
+-----/-----/-----/-----/-----/
34 lib/Druid/View/Text.pm
View
@@ -27,7 +27,7 @@ my $h-piece = '
';
my $cover-right = '
-
+
#
#
';
@@ -42,29 +42,29 @@ my $cover-top-right = '
#=[Returns a string containing an ASCII picture of an empty Druid board of
the given size.]
-sub make-empty-board($size) {
+sub make-empty-board($size) {
# The 'join $sep, gather { ... }' pattern allows us to put a long
# string together, without having to refer to the same variable over
# and over.
- return join "\n", gather {
- take '';
- take my $heading
- = [~] ' ', map {" $_ "}, map {chr($_+ord('A'))}, ^$size;
- take my $line = [~] ' ', '+-----' x $size, '+';
+ return join "\n", gather {
+ take '';
+ take my $heading
+ = [~] ' ', map {" $_ "}, map {chr($_+ord('A'))}, ^$size;
+ take my $line = [~] ' ', '+-----' x $size, '+';
for (1..$size).reverse -> $r {
take [~] (sprintf '%2d |', $r),
' ' x ($size) - 1,
" | $r";
- take [~] ' |', ' ' x ($size) - 1, ' |';
- if $r > 1 {
- take [~] ' +', ' +' x $size;
- }
- }
- take $line;
- take $heading;
- take '';
- };
-}
+ take [~] ' |', ' ' x ($size) - 1, ' |';
+ if $r > 1 {
+ take [~] ' +', ' +' x $size;
+ }
+ }
+ take $line;
+ take $heading;
+ take '';
+ };
+}
submethod BUILD() {
$!cached-board = make-empty-board($!game.size);
2  lib/Druid/Webapp.pm
View
@@ -3,7 +3,7 @@ use v6;
use Web::Request;
use Web::Response;
-use Druid::Game;
+use Druid::Game;
use Druid::View::Text;
class Druid::Webapp does Callable {
Please sign in to comment.
Something went wrong with that request. Please try again.