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
44aab7cc
Commit
44aab7cc
authored
Nov 08, 1999
by
David Byers
Browse files
Bug fix in to-do-list sorting
Bug fix in handling add-recipient async send for BCC recipients we can't see
parent
c353127b
Changes
4
Hide whitespace changes
Inline
Side-by-side
src/ChangeLog
View file @
44aab7cc
1999-11-08 David Byers <davby@ida.liu.se>
* reading.el (lyskom-read-info-<): Fixed stupid operator error.
1999-10-27 David Byers <davby@ida.liu.se>
* async.el (lyskom-async-new-recipient): Hantera situationen att
man inte hittar det lokala textnumret.
1999-10-25 David Byers <davby@ida.liu.se>
* startup.el (lyskom): Set process coding system decoding to
...
...
src/TODO
View file @
44aab7cc
...
...
@@ -3,6 +3,13 @@
Att göra i elisp-klienten
=========================
Bli av med lyskom-is-parsing, gör parsern reentrant, installera
reentrant blocking-do. Se över alla användningar av lyskom-wait-queue
eftersom den just nu inte kan användas i svar på asynkront anrop.
* Den parsade strängen måste bort innan man anropar callback-funktionen.
Någon form at reply till importerade brev som använder mx-reply-to
eller mx-to, mx-cc om de finns.
...
...
src/async.el
View file @
44aab7cc
...
...
@@ -598,14 +598,14 @@ converted, before insertion."
(
when
(
and
(
eq
(
misc-info->type
misc-info
)
misc-type
)
(
eq
(
misc-info->recipient-no
misc-info
)
conf-no
))
(
setq
local-no
(
misc-info->local-no
misc-info
))))
(
if
(
null
local-no
)
(
error
"No local no"
))
(
initiate-get-conf-stat
'async
'lyskom-add-new-text
conf-no
text-no
local-no
)
(
lyskom-prefetch-text-all
text-no
)
(
lyskom-run
'async
'lyskom-default-new-recipient-hook
text-stat
)
(
lyskom-run
'async
'lyskom-prefetch-and-print-prompt
))))
(
when
local-no
(
initiate-get-conf-stat
'async
'lyskom-add-new-text
conf-no
text-no
local-no
)
(
lyskom-prefetch-text-all
text-no
)
(
lyskom-run
'async
'lyskom-default-new-recipient-hook
text-stat
)
(
lyskom-run
'async
'lyskom-prefetch-and-print-prompt
))))
)
(
defun
lyskom-default-new-recipient-hook
(
text-stat
)
(
when
(
and
(
not
lyskom-dont-change-prompt
)
;We shall change it
...
...
src/reading.el
View file @
44aab7cc
...
...
@@ -174,7 +174,7 @@ reasonable guess."
;; Both are confs of equal priority; check position in mship
((
and
(
eq
(
read-info->type
a
)
'CONF
)
(
eq
(
read-info->type
b
)
'CONF
))
(
>=
(
lyskom-membership-position
(
<
(
lyskom-membership-position
(
conf-stat->conf-no
(
read-info->conf-stat
a
)))
(
lyskom-membership-position
(
conf-stat->conf-no
(
read-info->conf-stat
b
)))))
...
...
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