small Hypnotoad documentation tweaks

mojolicious · Mar 25, 2012 · 4104439 · 4104439
1 parent 6eeff54
commit 4104439
Show file tree

Hide file tree

Showing 2 changed files with 20 additions and 20 deletions.
diff --git a/lib/Mojo/Server/Hypnotoad.pm b/lib/Mojo/Server/Hypnotoad.pm
@@ -580,7 +580,8 @@ the server has been stopped.
 
   proxy => 1
 
-Activate reverse proxy support.
+Activate reverse proxy support, defaults to the value of the
+C<MOJO_REVERSE_PROXY> environment variable.
 
 =head2 C<upgrade_timeout>
 

diff --git a/lib/Mojo/URL.pm b/lib/Mojo/URL.pm
@@ -125,29 +125,28 @@ sub parse {
 sub path {
   my ($self, $path) = @_;
 
+  # Old path
+  return $self->{path} ||= Mojo::Path->new unless $path;
+
   # New path
-  if ($path) {
-    if (!ref $path) {
-
-      # Absolute path
-      if ($path =~ m#^/#) { $path = Mojo::Path->new($path) }
-
-      # Relative path
-      else {
-        my $new = Mojo::Path->new($path);
-        $path = $self->{path} || Mojo::Path->new;
-        pop @{$path->parts} unless $path->trailing_slash;
-        push @{$path->parts}, @{$new->parts};
-        $path->leading_slash(1);
-        $path->trailing_slash($new->trailing_slash);
-      }
+  if (!ref $path) {
+
+    # Absolute path
+    if ($path =~ m#^/#) { $path = Mojo::Path->new($path) }
+
+    # Relative path
+    else {
+      my $new = Mojo::Path->new($path);
+      $path = $self->{path} || Mojo::Path->new;
+      pop @{$path->parts} unless $path->trailing_slash;
+      push @{$path->parts}, @{$new->parts};
+      $path->leading_slash(1);
+      $path->trailing_slash($new->trailing_slash);
     }
-    $self->{path} = $path;
-
-    return $self;
   }
+  $self->{path} = $path;
 
-  return $self->{path} ||= Mojo::Path->new;
+  return $self;
 }
 
 sub query {