(if arg (read-string (_ "Signoff message: "))
(or liece-signoff-message
(product-name (product-find 'liece-version))))))
- (if quit-string
- (liece-send "QUIT :%s" quit-string)
- (liece-send "QUIT")))))
+ (liece-close-server quit-string))))
(defun liece-command-generic (message)
"Enter a generic IRC MESSAGE, which is sent to the server.