mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-02-16 16:24:18 +00:00
Fix bug when buffer is empty
This commit is contained in:
parent
42b213de71
commit
bf2867688e
1 changed files with 10 additions and 9 deletions
|
|
@ -29,6 +29,7 @@
|
||||||
(not (= self-chat-num self-chat-last)))
|
(not (= self-chat-num self-chat-last)))
|
||||||
(setq self-chat-last2 self-chat-last
|
(setq self-chat-last2 self-chat-last
|
||||||
self-chat-last self-chat-num))
|
self-chat-last self-chat-num))
|
||||||
|
(unless (and (eobp) (bobp))
|
||||||
;; Are we fixing up an old line, or creating a new one?
|
;; Are we fixing up an old line, or creating a new one?
|
||||||
(if (save-excursion
|
(if (save-excursion
|
||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
|
|
@ -37,7 +38,7 @@
|
||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
(kill-line))
|
(kill-line))
|
||||||
(call-interactively #'newline)
|
(call-interactively #'newline)
|
||||||
(call-interactively #'newline))
|
(call-interactively #'newline)))
|
||||||
(insert "> "))
|
(insert "> "))
|
||||||
|
|
||||||
(defun chat-post ()
|
(defun chat-post ()
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue