;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
;;; Code:
(riece-channel-list-buffer "*Channels*" riece-channel-list-mode)
(riece-user-list-buffer " *Users*" riece-user-list-mode)
(riece-temp-buffer " *Temp*")
- (riece-debug-buffer " *Debug*")))
+ (riece-debug-buffer "*Debug*")))
(defvar riece-select-keys
`("#" riece-command-switch-to-channel-by-number
"p" riece-command-enter-message-to-user
"q" riece-command-quit
"r" riece-command-configure-windows
+ "s" riece-command-save-variables
"x" riece-command-copy-region
"t" riece-command-topic
"w" riece-command-who
(defvar print-quoted)
(defvar print-escape-multibyte)
(defun riece-save-variables-files ()
- "Save current settings to `riece-variables-file'."
+ "Save current settings to `riece-saved-variables-file'."
(with-temp-file riece-saved-variables-file
(let ((print-quoted t)
(print-readably t)