diff --git a/sway/wallpaper.pl b/sway/wallpaper.pl
index 1ef0486..aaaabef 100755
--- a/sway/wallpaper.pl
+++ b/sway/wallpaper.pl
@@ -207,7 +207,7 @@ sub choose_image($self)
 sub crop($self, $image, $ow, $oh)
 {
     my $cropped = $image;
-    $cropped =~ s#^.*/([^/]*)\.([^\.]+)$#$self->{'path'}$1-cropped.$2#;
+    $cropped =~ s#^.*/([^/]*)\.([^\.]+)$#$self->{'path'}/$1-cropped.$2#;
 
     use Image::Magick;
     my $im = Image::Magick->new();