From b068b8b11002dd9d6e8fb51f7b5738e1f79998d9 Mon Sep 17 00:00:00 2001
From: Jules Laplace <julescarbon@gmail.com>
Date: Thu, 21 Jun 2018 16:37:29 +0200
Subject: urgh punctuation

---
 get.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'get.pl')

diff --git a/get.pl b/get.pl
index d5c2be6..2081bb8 100755
--- a/get.pl
+++ b/get.pl
@@ -10,7 +10,7 @@ sub sanitize ($) {
   $s =~ s/^\s+//;
   $s =~ s/\s+$//;
   $s =~ s/\.[^.]+$//g;
-  $s =~ s/\W//g;
+  $s =~ s/[-\[\]\(\)\+\*\\\/\'\"\`\!\@\#\$\%\^\&]//g
   $s =~ s/\s+/_/g;
   if (length($s) == 0) {
     print "fn is empty";
-- 
cgit v1.2.3-70-g09d2