diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2022-07-18 19:33:50 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2022-07-18 19:33:50 +0200 |
| commit | 7a937167030d44341409b3a2ac7ff1704142a191 (patch) | |
| tree | eaacc48007993c781c46fcddfbc61e8b2a39f7c6 /lisp | |
| parent | e555446907880280ee3a6c194e13d03f8405bb30 (diff) | |
| download | emacs-7a937167030d44341409b3a2ac7ff1704142a191.tar.gz emacs-7a937167030d44341409b3a2ac7ff1704142a191.tar.bz2 emacs-7a937167030d44341409b3a2ac7ff1704142a191.zip | |
Use ntake also in tramp-adb.el
* lisp/net/tramp-adb.el (tramp-adb-handle-directory-files-and-attributes):
Use `tramp-compat-ntake'.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/net/tramp-adb.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el index b504ce600d1..de558568308 100644 --- a/lisp/net/tramp-adb.el +++ b/lisp/net/tramp-adb.el @@ -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) |