Permalink
Browse files

Fix tab/space issues

  • Loading branch information...
1 parent 9943c57 commit a693fc7cf66932a95924fd755a24ce6191d26dbd @ronaldxs ronaldxs committed Aug 8, 2011
Showing with 31 additions and 31 deletions.
  1. +5 −5 lib/URI.pm
  2. +26 −26 lib/URI/DefaultPort.pm
View
@@ -146,17 +146,17 @@ method host {
}
method default_port {
- URI::DefaultPort::scheme_port($.scheme)
+ URI::DefaultPort::scheme_port($.scheme)
}
method _port {
- # port 0 is off limits and see also RT 96424
- # $!authority<port>.Int doesn't work because of RT 96472
+ # port 0 is off limits and see also RT 96424
+ # $!authority<port>.Int doesn't work because of RT 96472
$!authority<port> ?? ($!authority<port> ~ '').Int !! Int;
}
method port {
- $._port // $.default_port;
+ $._port // $.default_port;
}
method path {
@@ -176,7 +176,7 @@ method query {
}
method path_query {
- $.query ?? $.path ~ '?' ~ $.query !! $.path
+ $.query ?? $.path ~ '?' ~ $.query !! $.path
}
View
@@ -5,32 +5,32 @@ use v6;
package URI::DefaultPort {
- my %default_port = (
- ftp => 21,
- ssh => 22,
- telnet => 23,
- tn3270 => 23,
- gopher => 70,
- http => 80,
- pop => 110,
- news => 119,
- ldap => 389,
- https => 443,
- rlogin => 513,
- rtsp => 554,
- rtspu => 554,
- snews => 563,
- ldaps => 636,
- rsync => 873,
- mms => 1755,
- sip => 5060,
- sips => 5061
- );
-
- our sub scheme_port(Str $scheme) {
- # guessing the // Int should be unnecessary some day ...
- return %default_port{$scheme}.Int // Int;
- }
+ my %default_port = (
+ ftp => 21,
+ ssh => 22,
+ telnet => 23,
+ tn3270 => 23,
+ gopher => 70,
+ http => 80,
+ pop => 110,
+ news => 119,
+ ldap => 389,
+ https => 443,
+ rlogin => 513,
+ rtsp => 554,
+ rtspu => 554,
+ snews => 563,
+ ldaps => 636,
+ rsync => 873,
+ mms => 1755,
+ sip => 5060,
+ sips => 5061
+ );
+
+ our sub scheme_port(Str $scheme) {
+ # guessing the // Int should be unnecessary some day ...
+ return %default_port{$scheme}.Int // Int;
+ }
}

0 comments on commit a693fc7

Please sign in to comment.