10sr 10 лет назад
Родитель
Сommit
61f170e1bc
1 измененных файлов: 2 добавлений и 2 удалений
  1. +2
    -2
      emacs.el

+ 2
- 2
emacs.el Просмотреть файл

@@ -2423,6 +2423,7 @@ this is test, does not rename files."
(restorecolor "\033[0m")
(cols (frame-parameter nil 'width))
(length (length string)))
;; (redraw-frame (selected-frame))
(send-string-to-terminal (concat savepos
(format movecursor
(1+ (- cols length)))
@@ -2430,11 +2431,10 @@ this is test, does not rename files."
string
restorecolor
restorepos))
;; (redraw-frame (selected-frame))
))

(run-with-timer
1
0.1
1
(lambda ()
(set-terminal-header (concat " "


Загрузка…
Отмена
Сохранить