From d31e215626887e26cf9dc1f1ece1f157f440fd15 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Mon, 24 Feb 2003 16:04:59 +0000
Subject: [PATCH] add \\ character

---
 cmd/run.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cmd/run.pl b/cmd/run.pl
index 4a04c4cc..cfe2d8a2 100644
--- a/cmd/run.pl
+++ b/cmd/run.pl
@@ -19,7 +19,7 @@ while (@f) {
 		push @out, $self->msg('e5');
 		next;
 	}
-	$f =~ s|[^-\w/]||g;
+	$f =~ s|[^-\w/\\]||g;
 	my $script = new Script(lc $f);
 	unless ($script) {
 		push @out, $self->msg('e3', 'script', $f);
-- 
2.43.0