label search bugfix

git-svn-id: svn://rubyforge.org/var/svn/sup/trunk@537 5c8cc53c-5e98-4d25-b20a-d8db53a31250

diff --git a/bin/sup b/bin/sup
index 918ec47636a368eb0daf8646123bab35dfbca789..6ffbac5c824637fe6b3e2f5e7ccf8970492e39bc 100644 (file)
--- a/bin/sup
+++ b/bin/sup
@@ -225,7 +225,13 @@ begin
       when :list_labels
         labels = LabelManager.listable_labels.map { |l| LabelManager.string_for l }
         user_label = bm.ask_with_completions :label, "Show threads with label (enter for listing): ", labels
-        user_label = bm.spawn_modal("Label list", LabelListMode.new) if user_label && user_label.empty?
+        user_label =
+          case user_label
+          when nil, /^\s*$/
+            bm.spawn_modal("Label list", LabelListMode.new) if user_label && user_label.empty?
+          else
+            user_label.intern
+          end
         
         case user_label
         when nil