martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(ange-ftp-process-handle-hash): If

Browse Source 
ange-ftp-hash-mark-unit is nil, don't display a message.
(ange-ftp-process-filter): Call ange-ftp-process-handle-hash even
if ange-ftp-hash-mark-unit is nil.
This commit is contained in:
Richard M. Stallman
1995-11-19 18:03:46 +00:00
parent a5d004a13d
commit 909a7944cb
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ange-ftp.el
View File

@@ -1422,7 +1422,8 @@ good, skip, fatal, or unknown."
ange-ftp-hash-mark-count (+ (- (match-end 0)
(match-beginning 0))
ange-ftp-hash-mark-count))
(and ange-ftp-process-msg
(and ange-ftp-hash-mark-unit
ange-ftp-process-msg
ange-ftp-process-verbose
(not (eq (selected-window) (minibuffer-window)))
(not (boundp 'search-message)) ;screws up isearch otherwise
@@ -1466,8 +1467,7 @@ good, skip, fatal, or unknown."
(set-buffer (process-buffer proc))
;; handle hash mark printing
(and ange-ftp-hash-mark-unit
ange-ftp-process-busy
(and ange-ftp-process-busy
(string-match "^#+$" str)
(setq str (ange-ftp-process-handle-hash str)))
(comint-output-filter proc str)