From ca66033b8e8a7b2adba83ecee256270ae257a4d8 Mon Sep 17 00:00:00 2001 From: Vasilij Schneidermann Date: Thu, 28 Apr 2022 16:17:15 +0200 Subject: Style improvements --- nov.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/nov.el b/nov.el index d53e5d0..5076edc 100644 --- a/nov.el +++ b/nov.el @@ -195,9 +195,12 @@ Each element of the stack is a list (NODEINDEX BUFFERPOS).") "Extract FILENAME into DIRECTORY. Unnecessary nesting is removed with `nov-unnest-directory'." (let* ((status (apply #'call-process nov-unzip-program nil "*nov unzip*" t - (mapcar (lambda (e) (cond ((eq e 'directory) directory) - ((eq e 'filename) filename) - (t e))) nov-unzip-args))) + (mapcar (lambda (arg) + (cond + ((eq arg 'directory) directory) + ((eq arg 'filename) filename) + (t arg))) + nov-unzip-args))) child) (while (setq child (nov-contains-nested-directory-p directory)) (nov-unnest-directory directory child)) -- cgit v1.2.3