From 82de046fe2813a016450b3568b2db7286cf5d57c Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sat, 11 Jan 2020 14:59:16 +0000
Subject: allow multiple maildirs on cmdline

---
 lib/MaildirIndexer/ScanDir.rakumod | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'lib')

diff --git a/lib/MaildirIndexer/ScanDir.rakumod b/lib/MaildirIndexer/ScanDir.rakumod
index c45d787..e909d58 100644
--- a/lib/MaildirIndexer/ScanDir.rakumod
+++ b/lib/MaildirIndexer/ScanDir.rakumod
@@ -3,7 +3,7 @@ unit module MaildirIndexer::ScanDir;
 
 class End {};
 
-sub scan-dir(IO() $path --> Supply) is export {
+sub scan-dir(@paths --> Supply) is export {
     supply {
         my %watched-dirs;
 
@@ -24,8 +24,8 @@ sub scan-dir(IO() $path --> Supply) is export {
             }
         }
 
-        sub add-dir(IO::Path $dir) {
-            my @todo = $dir;
+        sub add-dir(IO::Path @dirs) {
+            my (@todo) = @dirs;
 
             while @todo {
                 my $next = @todo.shift;
@@ -46,7 +46,7 @@ sub scan-dir(IO() $path --> Supply) is export {
 
         }
 
-        add-dir($path);
+        add-dir(Array[IO::Path].new(@paths».IO));
         emit End;
     }
 }
-- 
cgit v1.2.3