From 32cbaba460f156808a47d2ca2e657a0302610884 Mon Sep 17 00:00:00 2001
From: Ivan Wills <Ivan.Wills2@optus.com.au>
Date: Fri, 30 Sep 2016 15:03:20 +1000
Subject: [PATCH] Skipping processing dir if it doesn't exist

---
 lib/File/TypeCategories.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/File/TypeCategories.pm b/lib/File/TypeCategories.pm
index e65afe2..f31239b 100644
--- a/lib/File/TypeCategories.pm
+++ b/lib/File/TypeCategories.pm
@@ -65,6 +65,7 @@ sub BUILD {
     # import each config file the each subsiquent config overwrites the
     # previous more general config.
     for my $config_dir ($dir, $ENV{HOME}, '.') {
+        next if ! $config_dir || !-d $config_dir;
         my $config_file = "$config_dir/$config_name";
         next if !-f $config_file;