(interactive)
(kill-all-local-variables)
- (setq riece-freeze riece-default-freeze
- riece-freeze-indicator (if riece-freeze "F" "-")
- riece-own-freeze riece-default-own-freeze
- riece-own-freeze-indicator (if riece-own-freeze "M" "-")
- riece-away-indicator "-"
+ (setq riece-away-indicator "-"
+ riece-operator-indicator "-"
major-mode 'riece-command-mode
mode-name "Commands"
mode-line-buffer-identification
'("Riece: "
mode-line-modified
riece-away-indicator
+ riece-operator-indicator
"-- " riece-current-channel " " riece-real-nickname)))
(riece-simplify-mode-line-format)
(use-local-map riece-command-mode-map)
(kill-all-local-variables)
(make-local-variable 'riece-freeze)
- (make-local-variable 'riece-freeze-indicator)
- (make-local-variable 'riece-own-freeze)
- (make-local-variable 'riece-own-freeze-indicator)
(make-local-variable 'tab-stop-list)
(setq riece-freeze riece-default-freeze
- riece-freeze-indicator (if riece-freeze "F" "-")
- riece-own-freeze riece-default-own-freeze
- riece-own-freeze-indicator (if riece-own-freeze "M" "-")
riece-away-indicator "-"
+ riece-operator-indicator "-"
major-mode 'riece-dialogue-mode
mode-name "Dialogue"
mode-line-buffer-identification
'("Riece: "
mode-line-modified
riece-away-indicator
+ riece-operator-indicator
riece-freeze-indicator
riece-own-freeze-indicator
" " riece-channel-list-indicator " "))
buffer-read-only t
tab-stop-list riece-tab-stop-list)
+ (riece-update-status-indicators)
(riece-simplify-mode-line-format)
(use-local-map riece-dialogue-mode-map)
(buffer-disable-undo)
'("Riece: "
mode-line-modified
riece-away-indicator
+ riece-operator-indicator
riece-freeze-indicator
riece-own-freeze-indicator
" "