[PATCH] debbugs: Fix wrong lisp indentation

[Naoya Yamashita]

Hi, all.

I found debbugs package in ELPA and there are indentation error.
This patch fixes the issue.

Best,

>From e530aa993fbd2866f5ad7f124d37534a31a5555f Mon Sep 17 00:00:00 2001
From: conao3 <conao3@gmail.com>
Date: Mon, 17 Aug 2020 23:39:24 +0900
Subject: [PATCH] debbugs: Fix wrong lisp indentation

* packages/debbugs/debbugs.el: Fix wrong lisp indentation
---
 packages/debbugs/debbugs.el | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/packages/debbugs/debbugs.el b/packages/debbugs/debbugs.el
index eca520c6f..f030cb268 100644
--- a/packages/debbugs/debbugs.el
+++ b/packages/debbugs/debbugs.el
@@ -33,7 +33,7 @@
 
 ;;; Code:
 
-;(setq soap-debug t url-debug t message-log-max t)
+;; (setq soap-debug t url-debug t message-log-max t)
 (require 'soap-client)
 (eval-when-compile (require 'cl-lib))
 
@@ -128,7 +128,7 @@ t or 0 disables caching, nil disables expiring."
   :type 'boolean)
 
 (defvar debbugs-progress-reporter nil
- "The progress reporter.
+  "The progress reporter.
 Don't set this globally, it shall be let-bound.")
 
 (defvar debbugs-progress-reporter-buffers nil
@@ -149,20 +149,20 @@ Don't set this globally, it shall be let-bound.")
       (progress-reporter-update
        debbugs-progress-reporter
        (and ;; There is a min value.
-           (aref (cdr debbugs-progress-reporter) 1)
-           ;; There's a percentage.
-           (natnump (car args))
-           (let ((cell
-                  (assq (current-buffer) debbugs-progress-reporter-buffers)))
-             (if (null cell)
-                 ;; Just one buffer from synchronous call.
-                 (car args)
-               ;; We must accumulate several buffer's percentage.
-               (setcdr cell (car args))
-               (floor
-                (apply #'+ (mapcar (lambda (elt) (cdr elt))
-                                   debbugs-progress-reporter-buffers))
-                (length debbugs-progress-reporter-buffers)))))))))
+       (aref (cdr debbugs-progress-reporter) 1)
+       ;; There's a percentage.
+       (natnump (car args))
+       (let ((cell
+              (assq (current-buffer) debbugs-progress-reporter-buffers)))
+         (if (null cell)
+             ;; Just one buffer from synchronous call.
+             (car args)
+           ;; We must accumulate several buffer's percentage.
+           (setcdr cell (car args))
+           (floor
+            (apply #'+ (mapcar (lambda (elt) (cdr elt))
+                               debbugs-progress-reporter-buffers))
+            (length debbugs-progress-reporter-buffers)))))))))
 
 (defun debbugs-get-bugs (&rest query)
   "Return a list of bug numbers which match QUERY.
-- 
2.28.0