5657 |
(mapconcat 'identity |
(mapconcat 'identity |
5658 |
(split-string string "\n") |
(split-string string "\n") |
5659 |
tramp-rsh-end-of-line)) |
tramp-rsh-end-of-line)) |
5660 |
(unless (string-equal (substring string -1) tramp-rsh-end-of-line) |
(unless (or (string= string "") |
5661 |
|
(string-equal (substring string -1) tramp-rsh-end-of-line)) |
5662 |
(setq string (concat string tramp-rsh-end-of-line))) |
(setq string (concat string tramp-rsh-end-of-line))) |
5663 |
;; send the string |
;; send the string |
5664 |
(if (and tramp-chunksize (not (zerop tramp-chunksize))) |
(if (and tramp-chunksize (not (zerop tramp-chunksize))) |