[elpa] master b674856 07/10: diff-hl-flydiff-update: Check whether diff-hl-mode is enabled

[Dmitry Gutov]

branch: master
commit b674856b65a0ebcd5920a3cdc5a17409d3ecda0e
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

diff-hl-flydiff-update: Check whether diff-hl-mode is enabled

Closes #60
---
 diff-hl-flydiff.el |1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index 30a3543..94dbbd7 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -138,6 +138,7 @@ This requires the external program `diff' to be in your 
`exec-path'."
 
 (defun diff-hl-flydiff-update ()
   (unless (or
+   (not diff-hl-mode)
(= diff-hl-flydiff-modified-tick (buffer-modified-tick))
(file-remote-p default-directory))
 (diff-hl-update)))

[elpa] master bf6098d 10/10: Merge commit 'd0e6660ee501efea3e9b0936ed64fff09e66df02' from diff-hl

[Dmitry Gutov]

branch: master
commit bf6098d462783a2ee75d031d80d3d296e4ff138a
Merge: 5f09f80 d0e6660
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Merge commit 'd0e6660ee501efea3e9b0936ed64fff09e66df02' from diff-hl
---
 packages/diff-hl/diff-hl-flydiff.el |   40 +-
 packages/diff-hl/diff-hl.el |8 +++---
 2 files changed, 19 insertions(+), 29 deletions(-)

diff --git a/packages/diff-hl/diff-hl-flydiff.el 
b/packages/diff-hl/diff-hl-flydiff.el
index 53d31f7..94dbbd7 100644
--- a/packages/diff-hl/diff-hl-flydiff.el
+++ b/packages/diff-hl/diff-hl-flydiff.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc.
+;; Copyright (C) 2015, 2016 Free Software Foundation, Inc.
 
 ;; Author:   Jonathan Hayase 
 ;; URL:  https://github.com/dgutov/diff-hl
@@ -105,19 +105,18 @@ the user should be returned."
   (if (file-exists-p automatic-backup)
   (rename-file automatic-backup filename nil)
 (with-current-buffer filebuf
-  (let ((failed t)
-(coding-system-for-read 'no-conversion)
+  (let ((coding-system-for-read 'no-conversion)
 (coding-system-for-write 'no-conversion))
-(unwind-protect
+(condition-case nil
 (with-temp-file filename
   (let ((outbuf (current-buffer)))
 ;; Change buffer to get local value of
 ;; vc-checkout-switches.
 (with-current-buffer filebuf
   (vc-call find-revision file revision outbuf
-  (setq failed nil)
-  (when (and failed (file-exists-p filename))
-(delete-file filename)))
+  (error
+   (when (file-exists-p filename)
+ (delete-file filename
 filename))
 
 (defun diff-hl-flydiff-buffer-with-head (file &optional backend)
@@ -125,7 +124,8 @@ the user should be returned."
 This requires the external program `diff' to be in your `exec-path'."
   (interactive)
   (vc-ensure-vc-buffer)
-  (with-current-buffer (get-buffer (current-buffer))
+  (setq diff-hl-flydiff-modified-tick (buffer-modified-tick))
+  (save-current-buffer
 (let* ((temporary-file-directory
 (if (file-directory-p "/dev/shm/")
 "/dev/shm/"
@@ -136,20 +136,16 @@ This requires the external program `diff' to be in your 
`exec-path'."
   (diff-no-select rev (current-buffer) "-U 0 --strip-trailing-cr" 'noasync
   (get-buffer-create " *diff-hl-diff*")
 
-(defun diff-hl-flydiff/update (old-fun &optional auto)
-  (unless (and auto
-   (or
-(= diff-hl-flydiff-modified-tick (buffer-modified-tick))
-(file-remote-p default-directory)
-(not (buffer-modified-p
-(funcall old-fun)))
+(defun diff-hl-flydiff-update ()
+  (unless (or
+   (not diff-hl-mode)
+   (= diff-hl-flydiff-modified-tick (buffer-modified-tick))
+   (file-remote-p default-directory))
+(diff-hl-update)))
 
 (defun diff-hl-flydiff/modified-p (state)
   (buffer-modified-p))
 
-(defun diff-hl-flydiff/update-modified-tick (&rest args)
-  (setq diff-hl-flydiff-modified-tick (buffer-modified-tick)))
-
 ;;;###autoload
 (define-minor-mode diff-hl-flydiff-mode
   "Highlight diffs on-the-fly"
@@ -157,25 +153,19 @@ This requires the external program `diff' to be in your 
`exec-path'."
   :global t
   (if diff-hl-flydiff-mode
   (progn
-(advice-add 'diff-hl-update :around #'diff-hl-flydiff/update)
 (advice-add 'diff-hl-overlay-modified :override #'ignore)
 
 (advice-add 'diff-hl-modified-p :before-until
 #'diff-hl-flydiff/modified-p)
 (advice-add 'diff-hl-changes-buffer :override
 #'diff-hl-flydiff-buffer-with-head)
-(advice-add 'diff-hl-change :after
-#'diff-hl-flydiff/update-modified-tick)
-
 (setq diff-hl-flydiff-timer
-  (run-with-idle-timer diff-hl-flydiff-delay t #'diff-hl-update 
t)))
+  (run-with-idle-timer diff-hl-flydiff-delay t 
#'diff-hl-flydiff-update)))
 
-(advice-remove 'diff-hl-update #'diff-hl-flydiff/update)
 (advice-remove 'diff-hl-overlay-modified #'ignore)
 
 (advice-remove 'diff-hl-modified-p #'diff-hl-flydiff/modified-p)
 (advice-remove 'diff-hl-changes-buffer #'diff-hl-flydiff-buffer-with-head)
-(advice-remove 'diff-hl-change #'diff-hl-flydiff/update-modified-tick)
 
 (cancel-timer diff-hl-flydiff-timer)))
 
diff --git a/packages/diff-hl/diff-hl.el b/packages/diff-hl/diff-hl.el
index cd3d017..b840788 100644
--- a/packages/diff-hl/diff-hl.el
+++ b/packages/diff-hl/diff-hl.el
@@ -1,11 +1,11 @@
-;;; diff-hl.el --- Highlight uncommitted changes -*- lexical-binding: t -*-
+;;; diff-hl.el --- Highlight uncommitted changes using VC -*- lexical-binding: 
t -*-
 
-;; Copyright (C) 2012-2015  Free Software Foundation, In

[elpa] master 6d973dc 02/10: diff-hl-flydiff-create-revision: Use condition-case

[Dmitry Gutov]

branch: master
commit 6d973dc8a7a1cbb5efd1c6c967d3c9c7f58bf2cd
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

diff-hl-flydiff-create-revision: Use condition-case

Fixes #59
---
 diff-hl-flydiff.el |   11 +--
 1 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index 53d31f7..a63bc06 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -105,19 +105,18 @@ the user should be returned."
   (if (file-exists-p automatic-backup)
   (rename-file automatic-backup filename nil)
 (with-current-buffer filebuf
-  (let ((failed t)
-(coding-system-for-read 'no-conversion)
+  (let ((coding-system-for-read 'no-conversion)
 (coding-system-for-write 'no-conversion))
-(unwind-protect
+(condition-case nil
 (with-temp-file filename
   (let ((outbuf (current-buffer)))
 ;; Change buffer to get local value of
 ;; vc-checkout-switches.
 (with-current-buffer filebuf
   (vc-call find-revision file revision outbuf
-  (setq failed nil)
-  (when (and failed (file-exists-p filename))
-(delete-file filename)))
+  (error
+   (when (file-exists-p filename)
+ (delete-file filename
 filename))
 
 (defun diff-hl-flydiff-buffer-with-head (file &optional backend)

[elpa] master dd28a9c 06/10: Bump copyright years

[Dmitry Gutov]

branch: master
commit dd28a9c2fd8f1fcd20adc70b0f3ffe143500dbbd
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Bump copyright years
---
 diff-hl-flydiff.el |2 +-
 diff-hl.el |2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index 138ca20..30a3543 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2015 Free Software Foundation, Inc.
+;; Copyright (C) 2015, 2016 Free Software Foundation, Inc.
 
 ;; Author:   Jonathan Hayase 
 ;; URL:  https://github.com/dgutov/diff-hl
diff --git a/diff-hl.el b/diff-hl.el
index 21077ba..7967722 100644
--- a/diff-hl.el
+++ b/diff-hl.el
@@ -1,6 +1,6 @@
 ;;; diff-hl.el --- Highlight uncommitted changes -*- lexical-binding: t -*-
 
-;; Copyright (C) 2012-2015  Free Software Foundation, Inc.
+;; Copyright (C) 2012-2016  Free Software Foundation, Inc.
 
 ;; Author:   Dmitry Gutov 
 ;; URL:  https://github.com/dgutov/diff-hl

[elpa] master updated (5f09f80 -> bf6098d)

[Dmitry Gutov]

dgutov pushed a change to branch master.

  from  5f09f80   Support highlighting of all visible matches
   new  89e08d6   diff-hl-revert-hunk: Kill the diff buffer afterwards
   new  6d973dc   diff-hl-flydiff-create-revision: Use condition-case
   new  5badd5d   Remove diff-hl-flydiff/update-modified-tick advice
   new  125bf44   Use save-current-buffer
   new  06e551b   Replace diff-hl-flydiff/update with a normal function
   new  dd28a9c   Bump copyright years
   new  b674856   diff-hl-flydiff-update: Check whether diff-hl-mode is 
enabled
   new  8082947   Add "using VC" to the summary
   new  d0e6660   Bump the version
   new  bf6098d   Merge commit 'd0e6660ee501efea3e9b0936ed64fff09e66df02' 
from diff-hl


Summary of changes:
 packages/diff-hl/diff-hl-flydiff.el |   40 +-
 packages/diff-hl/diff-hl.el |8 +++---
 2 files changed, 19 insertions(+), 29 deletions(-)

[elpa] master d0e6660 09/10: Bump the version

[Dmitry Gutov]

branch: master
commit d0e6660ee501efea3e9b0936ed64fff09e66df02
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Bump the version
---
 diff-hl.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/diff-hl.el b/diff-hl.el
index b223c03..b840788 100644
--- a/diff-hl.el
+++ b/diff-hl.el
@@ -5,7 +5,7 @@
 ;; Author:   Dmitry Gutov 
 ;; URL:  https://github.com/dgutov/diff-hl
 ;; Keywords: vc, diff
-;; Version:  1.8.1
+;; Version:  1.8.2
 ;; Package-Requires: ((cl-lib "0.2"))
 
 ;; This file is part of GNU Emacs.

[elpa] master 8082947 08/10: Add "using VC" to the summary

[Dmitry Gutov]

branch: master
commit 808294747cdb78172904c408e0da6ffb94eafd6e
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Add "using VC" to the summary
---
 diff-hl.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/diff-hl.el b/diff-hl.el
index 7967722..b223c03 100644
--- a/diff-hl.el
+++ b/diff-hl.el
@@ -1,4 +1,4 @@
-;;; diff-hl.el --- Highlight uncommitted changes -*- lexical-binding: t -*-
+;;; diff-hl.el --- Highlight uncommitted changes using VC -*- lexical-binding: 
t -*-
 
 ;; Copyright (C) 2012-2016  Free Software Foundation, Inc.
 

[elpa] master 125bf44 04/10: Use save-current-buffer

[Dmitry Gutov]

branch: master
commit 125bf440f93d45ac5792044c84e5cc21387c8064
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Use save-current-buffer
---
 diff-hl-flydiff.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index e5a6111..4d22813 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -125,7 +125,7 @@ This requires the external program `diff' to be in your 
`exec-path'."
   (interactive)
   (vc-ensure-vc-buffer)
   (setq diff-hl-flydiff-modified-tick (buffer-modified-tick))
-  (with-current-buffer (get-buffer (current-buffer))
+  (save-current-buffer
 (let* ((temporary-file-directory
 (if (file-directory-p "/dev/shm/")
 "/dev/shm/"

[elpa] master 06e551b 05/10: Replace diff-hl-flydiff/update with a normal function

[Dmitry Gutov]

branch: master
commit 06e551bd5ecd996621bb267297ef4644c7221207
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Replace diff-hl-flydiff/update with a normal function
---
 diff-hl-flydiff.el |   15 ++-
 1 files changed, 6 insertions(+), 9 deletions(-)

diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index 4d22813..138ca20 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -136,12 +136,11 @@ This requires the external program `diff' to be in your 
`exec-path'."
   (diff-no-select rev (current-buffer) "-U 0 --strip-trailing-cr" 'noasync
   (get-buffer-create " *diff-hl-diff*")
 
-(defun diff-hl-flydiff/update (old-fun &optional auto)
-  (unless (and auto
-   (or
-(= diff-hl-flydiff-modified-tick (buffer-modified-tick))
-(file-remote-p default-directory)))
-(funcall old-fun)))
+(defun diff-hl-flydiff-update ()
+  (unless (or
+   (= diff-hl-flydiff-modified-tick (buffer-modified-tick))
+   (file-remote-p default-directory))
+(diff-hl-update)))
 
 (defun diff-hl-flydiff/modified-p (state)
   (buffer-modified-p))
@@ -153,7 +152,6 @@ This requires the external program `diff' to be in your 
`exec-path'."
   :global t
   (if diff-hl-flydiff-mode
   (progn
-(advice-add 'diff-hl-update :around #'diff-hl-flydiff/update)
 (advice-add 'diff-hl-overlay-modified :override #'ignore)
 
 (advice-add 'diff-hl-modified-p :before-until
@@ -161,9 +159,8 @@ This requires the external program `diff' to be in your 
`exec-path'."
 (advice-add 'diff-hl-changes-buffer :override
 #'diff-hl-flydiff-buffer-with-head)
 (setq diff-hl-flydiff-timer
-  (run-with-idle-timer diff-hl-flydiff-delay t #'diff-hl-update 
t)))
+  (run-with-idle-timer diff-hl-flydiff-delay t 
#'diff-hl-flydiff-update)))
 
-(advice-remove 'diff-hl-update #'diff-hl-flydiff/update)
 (advice-remove 'diff-hl-overlay-modified #'ignore)
 
 (advice-remove 'diff-hl-modified-p #'diff-hl-flydiff/modified-p)

[elpa] master 5badd5d 03/10: Remove diff-hl-flydiff/update-modified-tick advice

[Dmitry Gutov]

branch: master
commit 5badd5def53d8e8d0c7e937c671eb09a4a7587c6
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Remove diff-hl-flydiff/update-modified-tick advice

It was broken:

* There's no function called diff-hl-change.

* Calling it from after-change-functions meant the tick value seemed
  always up to date.
---
 diff-hl-flydiff.el |   11 ++-
 1 files changed, 2 insertions(+), 9 deletions(-)

diff --git a/diff-hl-flydiff.el b/diff-hl-flydiff.el
index a63bc06..e5a6111 100644
--- a/diff-hl-flydiff.el
+++ b/diff-hl-flydiff.el
@@ -124,6 +124,7 @@ the user should be returned."
 This requires the external program `diff' to be in your `exec-path'."
   (interactive)
   (vc-ensure-vc-buffer)
+  (setq diff-hl-flydiff-modified-tick (buffer-modified-tick))
   (with-current-buffer (get-buffer (current-buffer))
 (let* ((temporary-file-directory
 (if (file-directory-p "/dev/shm/")
@@ -139,16 +140,12 @@ This requires the external program `diff' to be in your 
`exec-path'."
   (unless (and auto
(or
 (= diff-hl-flydiff-modified-tick (buffer-modified-tick))
-(file-remote-p default-directory)
-(not (buffer-modified-p
+(file-remote-p default-directory)))
 (funcall old-fun)))
 
 (defun diff-hl-flydiff/modified-p (state)
   (buffer-modified-p))
 
-(defun diff-hl-flydiff/update-modified-tick (&rest args)
-  (setq diff-hl-flydiff-modified-tick (buffer-modified-tick)))
-
 ;;;###autoload
 (define-minor-mode diff-hl-flydiff-mode
   "Highlight diffs on-the-fly"
@@ -163,9 +160,6 @@ This requires the external program `diff' to be in your 
`exec-path'."
 #'diff-hl-flydiff/modified-p)
 (advice-add 'diff-hl-changes-buffer :override
 #'diff-hl-flydiff-buffer-with-head)
-(advice-add 'diff-hl-change :after
-#'diff-hl-flydiff/update-modified-tick)
-
 (setq diff-hl-flydiff-timer
   (run-with-idle-timer diff-hl-flydiff-delay t #'diff-hl-update 
t)))
 
@@ -174,7 +168,6 @@ This requires the external program `diff' to be in your 
`exec-path'."
 
 (advice-remove 'diff-hl-modified-p #'diff-hl-flydiff/modified-p)
 (advice-remove 'diff-hl-changes-buffer #'diff-hl-flydiff-buffer-with-head)
-(advice-remove 'diff-hl-change #'diff-hl-flydiff/update-modified-tick)
 
 (cancel-timer diff-hl-flydiff-timer)))
 

[elpa] master 89e08d6 01/10: diff-hl-revert-hunk: Kill the diff buffer afterwards

[Dmitry Gutov]

branch: master
commit 89e08d60c4e8d5d4ddd47e14c0dd769ba965a545
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

diff-hl-revert-hunk: Kill the diff buffer afterwards

Closes #57.
---
 diff-hl.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/diff-hl.el b/diff-hl.el
index cd3d017..21077ba 100644
--- a/diff-hl.el
+++ b/diff-hl.el
@@ -417,7 +417,7 @@ in the source file, or the last line of the hunk above it."
   (with-current-buffer ,buffer
 (save-buffer))
   (message "Hunk reverted"
-  (quit-windows-on diff-buffer
+  (quit-windows-on diff-buffer t
 
 (defun diff-hl-hunk-overlay-at (pos)
   (cl-loop for o in (overlays-in pos (1+ pos))

[elpa] master 6d0b640: Improvement on debbugs

[Michael Albinus]

branch: master
commit 6d0b640def3e63b236aa88029246fefae0990b24
Author: Michael Albinus 
Commit: Michael Albinus 

Improvement on debbugs

* packages/debbugs/README:
* packages/debbugs/debbugs.texi (Top): Add reference to User Guide.

* packages/debbugs/debbugs-gnu.el (message-goto-body): Autoload.
(debbugs-gnu-default-suppress-bugs): Fix docstring.
(debbugs-gnu-dump-persistency-file, debbugs-gnu-sort-id):
Sort descending.
(debbugs-gnu-search, debbugs-gnu, debbugs-gnu-rescan)
(debbugs-gnu-mode, debbugs-gnu-bugs):
Set `debbugs-gnu-current-suppress' proper.
(debbugs-gnu-current-limit, debbugs-gnu-current-suppress):
Add docstring.
(debbugs-gnu-get-bugs): Don't sort.
(debbugs-gnu-print-entry): Don't suppress `debbugs-gnu-local-tags'
listed bugs.
(debbugs-gnu-mode-map): Make also a menu-map.
(debbugs-gnu-send-control-message): Report in echo area.

* packages/debbugs/debbugs-ug.texi (Retrieving Bugs):
Don't mention debbugs-gnu-default-hits-per-page any longer.
Describe debbugs-gnu-suppress-bugs.
(Tabulated Lists, TODO Items): Don't mention
debbugs-gnu-default-hits-per-page any longer.  Bugs are sorted
descending.
(Control Messages): Sort severities according to there importance.

* packages/debbugs/debbugs.el: Add Packages-Require header.
(debbugs-get-status): Fix docstring.
---
 packages/debbugs/README|3 +
 packages/debbugs/debbugs-browse.el |1 -
 packages/debbugs/debbugs-gnu.el|  124 ---
 packages/debbugs/debbugs-org.el|1 -
 packages/debbugs/debbugs-ug.info   |  125 
 packages/debbugs/debbugs-ug.texi   |   58 ++--
 packages/debbugs/debbugs.el|4 +-
 packages/debbugs/debbugs.info  |   15 +++--
 packages/debbugs/debbugs.texi  |3 +
 9 files changed, 181 insertions(+), 153 deletions(-)

diff --git a/packages/debbugs/README b/packages/debbugs/README
index 9b2cef5..74f8db8 100644
--- a/packages/debbugs/README
+++ b/packages/debbugs/README
@@ -12,6 +12,9 @@ could use the commands `M-x debbugs-org', `M-x 
debbugs-org-search' and
 A minor mode `debbugs-browse-mode' let you browse URLs to the GNU Bug
 Tracker as well as bug identifiers prepared for `bug-reference-mode'.
 
+All these commands are described in the Debbugs User Guide, accessible via
+(info "(debbugs-ug)")
+
 This package works by implementing basic functions to access a Debbugs
 SOAP server (see ).  It
 implements the SOAP functions "get_bugs", "newest_bugs", "get_status",
diff --git a/packages/debbugs/debbugs-browse.el 
b/packages/debbugs/debbugs-browse.el
index b572b2c..b4e87c7 100644
--- a/packages/debbugs/debbugs-browse.el
+++ b/packages/debbugs/debbugs-browse.el
@@ -5,7 +5,6 @@
 ;; Author: Michael Albinus 
 ;; Keywords: comm, hypermedia, maint
 ;; Package: debbugs
-;; Version: 0.8
 
 ;; This file is part of GNU Emacs.
 
diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index c57867a..51f5bf1 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/debbugs-gnu.el
@@ -6,7 +6,6 @@
 ;; Michael Albinus 
 ;; Keywords: comm, hypermedia, maint
 ;; Package: debbugs
-;; Version: 0.8
 
 ;; This file is not part of GNU Emacs.
 
@@ -156,6 +155,7 @@
 (autoload 'gnus-with-article-buffer "gnus-art")
 (autoload 'log-edit-insert-changelog "log-edit")
 (autoload 'mail-header-subject "nnheader")
+(autoload 'message-goto-body "message")
 (autoload 'message-make-from "message")
 (autoload 'rmail-get-new-mail "rmail")
 (autoload 'rmail-show-message "rmail")
@@ -240,7 +240,7 @@
   '((pending . "done"))
   "*A list of specs for bugs to be suppressed.
 An element of this list is a cons cell \(KEY . REGEXP\), with key
-being returned by `debbugs-get-status', and VAL a regular
+being returned by `debbugs-get-status', and REGEXP a regular
 expression matching the corresponding value, a string.  Showing
 suppressed bugs is toggled by `debbugs-gnu-toggle-suppress'."
   :group 'debbugs-gnu
@@ -291,7 +291,7 @@ If this is 'rmail, use Rmail instead."
  ";; -*- emacs-lisp -*-\n"
  ";; Debbugs tags connection history.  Don't change this file.\n\n"
  (format "(setq debbugs-gnu-local-tags '%S)"
-(sort (copy-sequence debbugs-gnu-local-tags) '<)
+(sort (copy-sequence debbugs-gnu-local-tags) '>)
 
 (defvar debbugs-gnu-current-query nil
   "The query object of the current search.
@@ -342,6 +342,8 @@ marked as \"client-side filter\"."
(if (zerop (length phrase))
(setq phrase nil)
  (add-to-list 'debbugs-gnu-current-query (cons 'phrase phrase)))
+   ;; We suppress the bugs if there is no phrase.
+   (setq-default debbugs-gnu-current-suppress (null phrase))
 
;; The other queries.
(catch :finished
@@ -458,8 +460,13 @@ marked as \"client-side filter\"."
 (se