Commit d16b4a56 authored by Per Cederqvist's avatar Per Cederqvist
Browse files

The code in lyskom-edit-send-check-recipients that checks if all the

authors of all the commented texts are a member in at least one of the
recipients only worked if there was at most one author.  Fix.
parent b8d03f4d
2000-06-04 Per Cederqvist <ceder@moria>
* edit-text.el (lyskom-edit-send-check-recipients): The code that
checks if all the authors of all the commented texts are a member
in at least one of the recipients only worked if there was at most
one author. Fix.
2000-06-02 David Byers <davby@ida.liu.se>
* lyskom-rest.el (kom-save-text): Use lyskom-saved-file to save
......
......@@ -856,8 +856,6 @@ Cannot be called from a callback."
;;
(set-collector->value collector nil)
(if (and (lyskom-default-value 'kom-confirm-multiple-recipients)
(not (eq (lyskom-default-value 'kom-confirm-multiple-recipients)
'before))
......@@ -873,6 +871,10 @@ Cannot be called from a callback."
(lyskom-get-string
'please-edit-recipients))))))
;;
;; Check that the authors of all commented texts get to see the new text
;;
(if (and (lyskom-default-value 'kom-check-commented-author-membership)
(assq 'comm-to (cdr misc-list)))
(progn
......@@ -913,6 +915,8 @@ Cannot be called from a callback."
(set-buffer lyskom-buffer)
(mapcar (function
(lambda (author-number)
(setq author-is-member nil)
(set-collector->value collector nil)
(mapcar
(function
(lambda (conference-number)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment