branch: externals/debbugs
commit d18926322c917336e9c3da8e7c6b5172f8f3ff29
Author: Michael Albinus <[email protected]>
Commit: Michael Albinus <[email protected]>
* debbugs.el (debbugs-get-bugs): Weaken syntax for packages (and
severities and tags).
---
ChangeLog | 4 ++--
debbugs.el | 2 +-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 0a20ff5..ea3da8b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,7 +1,7 @@
2011-07-13 Michael Albinus <[email protected]>
- * debbugs.el (debbugs-get-bugs): Extend syntax for packages (and
- severities and tags) by "-". Fix error messages.
+ * debbugs.el (debbugs-get-bugs): Weaken syntax for packages (and
+ severities and tags). Fix error messages.
2011-07-12 Michael Albinus <[email protected]>
diff --git a/debbugs.el b/debbugs.el
index 87134f1..ed089dc 100644
--- a/debbugs.el
+++ b/debbugs.el
@@ -144,7 +144,7 @@ Example:
(case key
((:package :severity :tag)
;; Value shall be one word.
- (if (string-match "\\`[-A-Za-z]+\\'" val)
+ (if (string-match "\\`\\S-+\\'" val)
(setq vec (vconcat vec (list val)))
(error "Wrong %s: %s" (substring (symbol-name key) 1) val)))
;; Value is an email address.
