[Emacs-diffs] Changes to emacs/lisp/term.el

[Juanma Barranquero]

Index: emacs/lisp/term.el
diff -c emacs/lisp/term.el:1.48 emacs/lisp/term.el:1.49
*** emacs/lisp/term.el:1.48     Tue Feb  4 06:43:01 2003
--- emacs/lisp/term.el  Tue Feb  4 07:08:27 2003
***************
*** 2688,2694 ****
                                (term-move-columns columns)
                                (delete-region pos (point))))
                            (setq term-current-column nil)
!                                                        
                            (put-text-property old-point (point)
                                               'face term-current-face)
                            ;; If the last char was written in last column,
--- 2688,2694 ----
                                (term-move-columns columns)
                                (delete-region pos (point))))
                            (setq term-current-column nil)
! 
                            (put-text-property old-point (point)
                                               'face term-current-face)
                            ;; If the last char was written in last column,
***************
*** 3739,3745 ****
                          (t (car term-completion-addsuffix))))
         (filesuffix (cond ((not term-completion-addsuffix) "")
                           ((not (consp term-completion-addsuffix)) " ")
!                          (t (cdr term-completion-addsuffix))))         
         (filename (or (term-match-partial-filename) ""))
         (pathdir (file-name-directory filename))
         (pathnondir (file-name-nondirectory filename))
--- 3739,3745 ----
                          (t (car term-completion-addsuffix))))
         (filesuffix (cond ((not term-completion-addsuffix) "")
                           ((not (consp term-completion-addsuffix)) " ")
!                          (t (cdr term-completion-addsuffix))))
         (filename (or (term-match-partial-filename) ""))
         (pathdir (file-name-directory filename))
         (pathnondir (file-name-nondirectory filename))