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> 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. * NEWS-0.48: Updated to here.
Support setting keep-commented: Support setting keep-commented:
......
...@@ -984,6 +984,7 @@ probably a general Q&A conference where you can ask." ...@@ -984,6 +984,7 @@ probably a general Q&A conference where you can ask."
(secmem (and (lyskom-have-feature long-conf-types) (secmem (and (lyskom-have-feature long-conf-types)
(not (lyskom-j-or-n-p (lyskom-get-string 'secret-members-allowed))))) (not (lyskom-j-or-n-p (lyskom-get-string 'secret-members-allowed)))))
(life-expectancy (lyskom-read-number 'new-garb-nice-q)) (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-no (blocking-do 'create-conf
conf-name conf-name
(lyskom-create-conf-type (not open) (lyskom-create-conf-type (not open)
...@@ -1016,7 +1017,8 @@ probably a general Q&A conference where you can ask." ...@@ -1016,7 +1017,8 @@ probably a general Q&A conference where you can ask."
nil ; Don't write a presentation nil ; Don't write a presentation
'lyskom-create-conf-handler-2) 'lyskom-create-conf-handler-2)
conf-no conf-name) 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) (defun lyskom-create-conf-handler-2 (conf-no conf-name)
......
Supports Markdown
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