projects
/
riece
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* riece-xemacs.el (riece-mouse-2): New variable.
[riece]
/
lisp
/
riece.el
diff --git
a/lisp/riece.el
b/lisp/riece.el
index
1dc512a
..
40353b9
100644
(file)
--- a/
lisp/riece.el
+++ b/
lisp/riece.el
@@
-147,7
+147,6
@@
If optional argument SAFE is nil, overwrite previous definitions."
"j" riece-command-join
"\C-k" riece-command-kick
"l" riece-command-list
"j" riece-command-join
"\C-k" riece-command-kick
"l" riece-command-list
- "m" riece-dialogue-enter-message
"M" riece-command-change-mode
"n" riece-command-change-nickname
"\C-n" riece-command-names
"M" riece-command-change-mode
"n" riece-command-change-nickname
"\C-n" riece-command-names
@@
-273,8
+272,7
@@
If optional argument CONFIRM is non-nil, ask which IRC server to connect."
riece-channel-list-indicator "No channel"
riece-away-indicator "-"
riece-operator-indicator "-"
riece-channel-list-indicator "No channel"
riece-away-indicator "-"
riece-operator-indicator "-"
- riece-freeze-indicator "-"
- riece-channel-history nil)
+ riece-freeze-indicator "-")
(delete-other-windows)
(run-hooks 'riece-exit-hook))
(delete-other-windows)
(run-hooks 'riece-exit-hook))
@@
-369,7
+367,6
@@
Instead, these commands are available:
All normal editing commands are turned off."
(kill-all-local-variables)
(buffer-disable-undo)
All normal editing commands are turned off."
(kill-all-local-variables)
(buffer-disable-undo)
- (make-local-variable 'riece-redisplay-buffer)
(setq major-mode 'riece-channel-list-mode
mode-name "Channels"
mode-line-buffer-identification
(setq major-mode 'riece-channel-list-mode
mode-name "Channels"
mode-line-buffer-identification
@@
-386,7
+383,6
@@
Instead, these commands are available:
\\{riece-user-list-mode-map}"
(kill-all-local-variables)
(buffer-disable-undo)
\\{riece-user-list-mode-map}"
(kill-all-local-variables)
(buffer-disable-undo)
- (make-local-variable 'riece-redisplay-buffer)
(setq major-mode 'riece-user-list-mode
mode-name "User list"
mode-line-buffer-identification
(setq major-mode 'riece-user-list-mode
mode-name "User list"
mode-line-buffer-identification
@@
-470,9
+466,12
@@
Instead, these commands are available:
(setq queue (cdr queue)))
(if dependencies
(error "Circular add-on dependency found"))
(setq queue (cdr queue)))
(if dependencies
(error "Circular add-on dependency found"))
+ (setq addons (nreverse addons))
(while addons
(require (car addons)) ;implicit dependency
(funcall (intern (concat (symbol-name (car addons)) "-insinuate")))
(while addons
(require (car addons)) ;implicit dependency
(funcall (intern (concat (symbol-name (car addons)) "-insinuate")))
+ (if riece-debug
+ (message "Add-on %S is loaded" (car addons)))
(setq addons (cdr addons)))))
(provide 'riece)
(setq addons (cdr addons)))))
(provide 'riece)