Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
lyskom-elisp-client
lyskom-elisp-client
Commits
16be11db
Commit
16be11db
authored
Jul 29, 2000
by
Johan Sundström
Browse files
More informative messages from kom-next-unread-kom.
parent
2f0bebce
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
16be11db
2000-07-30 Johan Sundstrm <jhs@lysator.liu.se>
* commands2.el (kom-next-unread-kom): More info, as suggested by
Hans Persson. Tells whether there are any other sessions
whatsoever when there are no other sessions with unread texts.
2000-07-28 Johan Sundstrm <jhs@lysator.liu.se>
* utilities.el (lyskom-read-text-no-prefix-arg): Policy change;
...
...
src/commands2.el
View file @
16be11db
...
...
@@ -1714,7 +1714,7 @@ Return-value: 'no-session if there is no suitable session to switch to
'no-other-lyskom-r
))
(
error
(
lyskom-get-string
'no-lyskom-session
))))
(
t
nil
))))
(
def-kom-emacs-command
kom-next-unread-kom
()
"Pop up the previous lyskom-session."
...
...
@@ -1727,8 +1727,12 @@ Return-value: 'no-session if there is no suitable session to switch to
(
error
(
lyskom-get-string
'no-unread-lyskom
))))
((
eq
result
'same-session
)
(
if
kom-next-unread-kom-running-as-kom-command
(
lyskom-insert-before-prompt
(
lyskom-get-string
'no-other-unread-lyskom-r
))
(
lyskom-insert-before-prompt
(
lyskom-get-string
;; Are there are any other sessions at all?
(
if
(
=
1
(
length
lyskom-buffer-list
))
'no-other-lyskom-r
'no-other-unread-lyskom-r
)))
(
error
(
lyskom-get-string
'no-lyskom-session
))))
(
t
nil
))))
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment