.emacs-my
changeset 564 0eae7b87c27a
parent 563 6d5387a4e95d
child 576 259fabfae56e
child 577 d24848aec7d1
equal deleted inserted replaced
563:6d5387a4e95d 564:0eae7b87c27a
   936    jabber-use-global-history nil
   936    jabber-use-global-history nil
   937    jabber-backlog-number 40
   937    jabber-backlog-number 40
   938    jabber-backlog-days 30
   938    jabber-backlog-days 30
   939    jabber-alert-presence-message-function (lambda (who oldstatus newstatus statustext) nil)
   939    jabber-alert-presence-message-function (lambda (who oldstatus newstatus statustext) nil)
   940    )
   940    )
       
   941   ;; Redefine standard binding for sending message form RET to C-RET.
       
   942   (define-key jabber-chat-mode-map (kbd "RET") 'newline)
       
   943   (define-key jabber-chat-mode-map [C-return] 'jabber-chat-buffer-send)
   941   )
   944   )
   942 
   945 
   943 (setq my-chat-prompt "[%t] %n>\n")
   946 (setq my-chat-prompt "[%t] %n>\n")
   944 (when (featurep 'jabber)
   947 (when (featurep 'jabber)
   945   (setq
   948   (setq