🚀 go-pugleaf

�������ҵ�.emacs��.gnus�����ļ�ȫ�ģ���æ������
�ҵ������Dzο���������ҳ��
http://my.gnus.org/html/gnus-tutorial_7.html#SEC29
http://josefsson.org/smtpmail.html

��Ҳ�����е㱿�������Ҿ�Բ�����Ӣ�ĵ��ֲ�Ҳ���ˣ�
�����ļ�����Nʮ�Σ���������emacs\gnusҲ��Nʮ�Σ�
��ʵ��û�취��ͨ��SMTPʹ��163���仹���޷����ʼ���������ԣ���

�����Һ�163��ȥ��ֻ�����ڹ��ڻ���û����������POP3���ŵ�������䣿
��������ʱ��Ҫ���ֻ������룬���ǽ����ѵ��ֻ������ɹ��ġ�
��λ�����п�Ҳ�����163�������ԣ������������÷��Ź��ܵģ�
���ߣ������ǵ����������ļ�Ҳ��������ҿ�����

>>>>>>>>>>>>>>>>>>>>�ҵ�.emacs�ļ�ȫ��<<<<<<<<<<<<<<<<<<<<<<
;; Red Hat Linux default .emacs initialization file  ; -*- mode:
emacs-lisp -*-
(global-set-key [delete] 'delete-char)
(global-set-key [kp-delete] 'delete-char)
(global-font-lock-mode t)
(setq-default transient-mark-mode t)
(setq require-final-newline t)
(setq next-line-add-newlines nil)
(when window-system
  (mwheel-install)
;;������redhat��Ĭ�����ã������������ӵģ�
(set-selection-coding-system 'compound-text-with-extensions))
(setq gnus-group-name-charset-group-alist '((".*" . gb2312 )))
(custom-set-variables
'(current-language-environment "Chinese-GB")
)
(set-keyboard-coding-system 'chinese-iso-8bit)   ; input
(set-selection-coding-system 'chinese-iso-8bit)  ; copy/paste
;;�������������ã���������ö������ˣ���Ϊ��.gnus������һ��Ч��Ҳһ��
;;(setq send-mail-function 'smtpmail-send-it)
;;(setq message-send-mail-function 'smtpmail-send-it)
;;(setq smtpmail-default-smtp-server "smtp.163.com")
;;(setq smtpmail-smtp-server "smtp.163.com")
;;(setq smtpmail-auth-credentials
;;'(("smtp.163.com" "25" "anonlmo" "1234567")))
;;(setq smtpmail-local-domain "163.com")
;;(setq smptmail-sendto-domain "163.com")
����������������������.emacs��������������������������

>>>>>>>>>>>>>>>>>>>>�ҵ�.gnus�ļ�ȫ��<<<<<<<<<<<<<<<<<<<<<<
(setq user-mail-address "anonlmo@163.com")
(setq user-full-name "Anonlmo")
(setq gnus-select-method '(nntp "news.newsfan.net"))
(setq gnus-secondary-select-methods '((nnml "")))
(setq mail-sources '((pop :server "pop.163.com"
                          :user "anonlmo"
                          :password "1234567")))

;;���ʹ����һ�У�����ʱû�г�����ʾ������ʵ����û�з���ȥ
;;��һ����gnus-tutorial��˵��not for gnus��
(setq send-mail-function 'smtpmail-send-it)

;;���ʹ����һ�У�����ʱ������ʾwrong type argument: stringp. nil
;;��һ����gnus-tutorial��˵��for gnus��
;;��һ�з���.emacs�����Ҳ��һ��
;;(setq message-send-mail-function 'smtpmail-send-it)

(setq smtpmail-default-smtp-server "smtp.163.com")

;;��֤�з���.emacs��Ч��Ҳ����.gnus��һ��
(setq smtpmail-auth-credentials
'(("smtp.163.com" 25 "anonlmo" "purepure")))

;;�����������������Ӱ�죬������ɡ�
(setq smtpmail-local-domain "163.com")
(setq smtpmail-sendto-domain "163.com")

(add-to-list 'gnus-secondary-select-methods '(nntp "news.webking.com.cn"))
(add-to-list 'gnus-secondary-select-methods '(nntp "news.yaako.com"))

;;Ϊ�������ɣ����������Ѿ�����
;;(gnus-agentize)
;;(setq gnus-check-new-newsgroups nil)
;;(setq gnus-agent-short-article 300)
;;(setq gnus-agent-long-article 200)
;;(setq message-insert-canlock nil)
;;(setq message-signature-file "~/signature.file")
��������������������������������������������������������