Commit 0ebcc450 authored by David Byers's avatar David Byers
Browse files

Ask about keep-commented when creating a conference.

Detailed changes:
> 	* commands1.el (kom-create-conf): Ask about keep-commented when
> 	creating conference.
>
parent abb18104
2003-08-24 David Byers <byers@lysator.liu.se>
* commands1.el (kom-create-conf): Ask about keep-commented when
creating conference.
* NEWS-0.48: Updated to here.
Support setting keep-commented:
......
......@@ -984,6 +984,7 @@ probably a general Q&A conference where you can ask."
(secmem (and (lyskom-have-feature long-conf-types)
(not (lyskom-j-or-n-p (lyskom-get-string 'secret-members-allowed)))))
(life-expectancy (lyskom-read-number 'new-garb-nice-q))
(keep-commented (lyskom-read-number 'new-keep-commented-q))
(conf-no (blocking-do 'create-conf
conf-name
(lyskom-create-conf-type (not open)
......@@ -1016,7 +1017,8 @@ probably a general Q&A conference where you can ask."
nil ; Don't write a presentation
'lyskom-create-conf-handler-2)
conf-no conf-name)
(blocking-do 'set-garb-nice conf-no life-expectancy)))))
(blocking-do 'set-garb-nice conf-no life-expectancy)
(blocking-do 'set-keep-commented conf-no keep-commented)))))
(defun lyskom-create-conf-handler-2 (conf-no conf-name)
......
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