[PathList] Expand excluded folders

lib/cocoapods/sandbox/path_list.rb

@@ -112,7 +112,10 @@ module Pod
         end.flatten
 
         list = list.map { |path| Pathname.new(path) }
-        list -= relative_glob(exclude_patterns) if exclude_patterns
+        if exclude_patterns
+          exclude_options = { :dir_pattern => '**/*', :include_dirs => include_dirs }
+          list -= relative_glob(exclude_patterns, exclude_options)
+        end
         list
       end
 

spec/unit/sandbox/path_list_spec.rb

@@ -106,6 +106,11 @@ module Pod
         ]
       end
 
+      it "allows to specify folders in the exclude patterns" do
+        paths = @path_list.relative_glob('Classes/*', { :exclude_patterns => 'Classes' }).map(&:to_s)
+        paths.sort.should.be.empty
+      end
+
       it "can optionally include the directories in the results" do
         paths = @path_list.relative_glob('Resources/*', { :include_dirs => true }).map(&:to_s)
         paths.sort.should == %w[