]> git.eshelyaron.com Git - emacs.git/commitdiff
Use ntake also in tramp-adb.el
authorMichael Albinus <michael.albinus@gmx.de>
Mon, 18 Jul 2022 17:33:50 +0000 (19:33 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Mon, 18 Jul 2022 17:33:50 +0000 (19:33 +0200)
* lisp/net/tramp-adb.el (tramp-adb-handle-directory-files-and-attributes):
Use `tramp-compat-ntake'.

lisp/net/tramp-adb.el

index b504ce600d1812cbb01ded9e05094f5f3809b32c..de558568308c9cd6df15facfbaa9a2f09ac3aab6 100644 (file)
@@ -354,7 +354,7 @@ arguments to pass to the OPERATION."
                                                  x))
                                  result)))
             (when (and (natnump count) (> count 0))
-              (setq result (nbutlast result (- (length result) count))))
+              (setq result (tramp-compat-ntake count result)))
              result)))))))
 
 (defun tramp-adb-get-ls-command (vec)