From: Tino Calancha Date: Sat, 4 Jun 2016 08:09:52 +0000 (+0200) Subject: Fix bug face for newly arrived bugs in debbugs-gnu.el X-Git-Url: https://code.delx.au/gnu-emacs-elpa/commitdiff_plain/4aea9615e0c5a16b0434f0f811198f34b4f48309?ds=sidebyside Fix bug face for newly arrived bugs in debbugs-gnu.el * packages/debbugs/debbugs-gnu.el (debbugs-gnu-show-reports): For some new bugs `date' and `log_modified' may differ in 1 second. --- diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el index 4c108cc46..dd1fe3346 100644 --- a/packages/debbugs/debbugs-gnu.el +++ b/packages/debbugs/debbugs-gnu.el @@ -678,8 +678,11 @@ are taken from the cache instead." 'debbugs-gnu-done) ((member "pending" (cdr (assq 'keywords status))) 'debbugs-gnu-pending) - ((= (cdr (assq 'date status)) - (cdr (assq 'log_modified status))) + ;; For some new bugs `date' and `log_modified' may + ;; differ in 1 second. + ((< (abs (- (cdr (assq 'date status)) + (cdr (assq 'log_modified status)))) + 3) 'debbugs-gnu-new) ((< (- (float-time) (cdr (assq 'log_modified status)))