Re: Reading mail, okay, but which way through?

[Merciadri Luca]

On 2 août, 21:28, Merciadri Luca <Luca.Mercia...@student.ulg.ac.be>
wrote:
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
>
>
> Byung-Hee HWANG <b...@izb.knu.ac.kr> writes:
> > Merciadri Luca <Luca.Mercia...@student.ulg.ac.be> writes:
>
> >> Just another question: I receive now ``File error: Cannot open load
> >> file, epa-file'' at the Emacs' opening. It seems that there is a
> >> problem. However, I followed your links as correctly as I was able to
> >> follow them. Actually, I just put the two commands in my .emacs,
> >> restarted Emacs, and it showed me this message.
>
> >> Is there a solution?
>
> > Because i can't figure out your problem exactly, could you please show
> > us your ~/.emacs file or ~/.gnus.el file? If i can't help you, the other
> > folks give you some voice for solving your problem. FYI, i'm newbie at
> > both Emacs and Gnus.
>
> > Sincerely,
>
> > --
> > "Why don't you check me out with our mutual friend?"
> >            -- Tom Hagen, "Chapter 1", page 58
>
> For sure. They are very crippy.
>
> $cat .emacs
>
> (custom-set-variables
>   ;; custom-set-variables was added by Custom.
>   ;; If you edit it by hand, you could mess it up, so be careful.
>   ;; Your init file should contain only one such instance.
>   ;; If there is more than one, they won't work right.
>  '(canlock-password "428b6edde131188f4d20acba071ac75b44ac7899")
>  '(column-number-mode t)
>  '(cua-mode t nil (cua-base))
>  '(display-battery-mode t)
>  '(display-time-mode t)
>  '(inhibit-startup-screen t)
>  '(show-paren-mode t)
>  '(size-indication-mode t)
>  '(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify)))
>  '(transient-mark-mode t))
> (custom-set-faces
>   ;; custom-set-faces was added by Custom.
>   ;; If you edit it by hand, you could mess it up, so be careful.
>   ;; Your init file should contain only one such instance.
>   ;; If there is more than one, they won't work right.
>  )
> ;; colors:
> (set-background-color "lightblue")
> (set-foreground-color "slateblue")
> (set-cursor-color "brown")
> (set-mouse-color "orangered")
>  (setq fill-column 20)
>  (setq-default auto-fill-function 'do-auto-fill)
> ;;; Prevent Extraneous Tabs
> (setq-default indent-tabs-mode nil)
> (setq load-path (cons "~ZEmacs" load-path))
> ;; ========== Enable Line and Column Numbering ==========
> ;; Show line-number in the mode line
> (line-number-mode 1)
> ;; Show column-number in the mode line
> (column-number-mode 1)
>
> ; mailcrypting stuff
> (load-library "mailcrypt")
> (mc-setversion "gpg")
> (autoload 'mc-install-write-mode "mailcrypt" nil t)
> (autoload 'mc-install-read-mode "mailcrypt" nil t)
> (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode)
> (add-hook 'message-mode-hook 'mc-install-write-mode)
> ;(add-hook 'mail-mode-hook 'mc-install-write-mode)
> (add-hook 'news-reply-mode-hook 'mc-install-write-mode)
> ; If you have more than one key, specify the one to use
> (setq mc-gpg-user-id "Merciadri Luca <Luca.Mercia...@student.ulg.ac.be>")
> ; Always sign encrypted messages
> (setq mc-pgp-always-sign t)
> ; How long should mailcrypt remember your passphrase
> (setq mc-passwd-timeout 600)
> ; Automagically sign all messages
> (add-hook 'message-send-hook 'will-you-sign)
> (defun will-you-sign ()
>         (load-library "mc-toplev")
>        (interactive)
>         (if (y-or-n-p "Do you want to sign this message? ")
>                 (mc-sign-message)))
> (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode)
> (add-hook 'message-mode-hook 'mc-install-write-mode)
> (add-hook 'news-reply-mode-hook 'mc-install-write-mode)
>
> ;(require 'epa-file)
> ;(epa-file-enable)
>
> $cat .gnus
>
> (setq user-full-name "Merciadri Luca")
> (setq user-mail-address "Luca.Mercia...@student.ulg.ac.be")
> (setq nnmail-spool-file "/var/mail/merciadriluca")
> (setq display-time-mail-file "/var/mail/merciadriluca")
> ;(setq message-default charset `utf-8)
> (setq nnml-directory "~/Mail/")
> (setq gnus-select-method '(nnml ""))
> (setq gnus-secondary-select-methods '((nntp "news.sunsite.dk")))
> ; to find news' servers which have your groups, see
> ;http://newzbot.com/
> ; there are too quimby.gnus.org, news.task.gda.pl, news.eutelia.it
>
> ;(setq gnus-directory "~/.News/")
> ;(setq message-directory "~/.Mail/")
>
> ;(require 'pgg)
>
>     (setq nntp-authinfo-function 'nntp-send-authinfo)
>     (setq gnus-select-method '(nntp "news.sunsite.dk"))
>     (setq gnus-message-archive-group "nnml:posted")
> ;(setq nntp-authinfo-file ".authinfo")
> ;(setq smtpmail-auth-credentials ".authinfo")
>
> ;; Utilisation du backend nnml avec procmail
> ;; nnmail-procmail-directory correspond à la variable MAILDIR
> ;; de votre .procmailrc
> (setq
>   gnus-secondary-select-methods '((nnml ""))
>   gnus-use-procmail t
>   nnmail-spool-file "procmail"
>   nnmail-procmail-directory "/home/merciadriluca/Mail"
>   nnmail-procmail-suffix ""
> )
>
> ;; Pour les nouvelles versions de Gnus (>= 5.8.7)
> ;(setq mail-sources
> ;   (list '(directory
> ;             :path "~/incoming/"
> ;             :suffix ""
> ;          )
> ;   )
> ;)
>
> (setq gnus-posting-styles
>       '(
>         (".*" ;; default style
>          (organization "ULg")
>          (address "Luca.Mercia...@student.ulg.ac.be")
>          (signature-file "~/Documents/e_mail-sig"))
>                                         ;((message-news-p) ;; for news
>                                         ;(address 
> "Luca.Mercia...@student.ulg.ac.be")
>                                         ;(organization "ULg")
>                                         ;(signature-file 
> "~/Documents/news-sig"))
>                                         ;(".*swing.*"
>                                         ;(organization "None")
>                                         ;(address "ml...@swing.be")
>                                         ;(signature-file 
> "~/Documents/e_mail-sig-swing"))
>                                         ;(".*free.*"
>                                         ;(organization "PlantesCarnivores")
>                                         ;(address "luca.mercia...@free.fr")
>                                         ;(signature-file 
> "~/Documents/e_mail-sig-free"))
>                                         ;)
>         )
>
>       )
>
> ;; Automcatically sign when sending mails
>  ;   (add-hook 'message-send-hook 'mml-secure-message-sign-pgpmime)
>
> ;; only sign
>     ;(add-hook 'gnus-message-setup-hook 'mml-secure-message-sign-pgpmime)
> ;;; only encrypt
>  ;   (add-hook 'gnus-message-setup-hook
>   ;            (lambda ()
>    ;              (mml-secure-message-encrypt-pgpmime 1)))
> ;
>
> ;(setq gnus-check-new-newsgroup nil)
>
> ;************************
> ;; MIME Settings for PGnus
> (require 'mm-util)
> (defun mm-read-charset (prompt)
>   "Return a charset."
>   'iso-8859-15)
> (setq gnus-default-posting-charset (quote iso-8859-15))
> (setq gnus-article-decode-mime-words t)
> (setq gnus-article-decode-charset 1)
> (setq gnus-mime-view-all-parts t) ; View all the MIME parts in current article
> (setq gnus-ignored-mime-types
>       '("text/x-vcard"))
> (setq gnus-unbuttonized-mime-types nil) ; MIME type -> no buttons when 
> rendered
> (setq
>  ;; Add buttons
>  gnus-treat-buttonize t
>  ;; Add buttons to the head
>  gnus-treat-buttonize-head 'head
>  ;; Emphasize text
>  gnus-treat-emphasize t
>  ;; Fill the article
>  gnus-treat-fill-article nil
>  ;; Remove carriage returns
>  gnus-treat-strip-cr 'last
>  ;; Hide headers
>  gnus-treat-hide-headers 'head
>  ;; Hide boring headers
>  gnus-treat-hide-boring-headers 'head
>  ;; Hide the signature
>  gnus-treat-hide-signature nil
>  ;; Hide cited text
>  gnus-treat-hide-citation nil
>  ;; Strip PGP signatures
>  gnus-treat-strip-pgp 'last
>  ;; Strip PEM signatures
>  gnus-treat-strip-pem 'last
>  ;; Highlight the headers
>  gnus-treat-highlight-headers 'head
>  ;; Highlight cited text
>  gnus-treat-highlight-citation 'last
>  ;; Highlight the signature
>  gnus-treat-highlight-signature 'last
>  ;; Display the Date in UT (GMT)
>  gnus-treat-date-ut nil
>  ;; Display the Date in the local timezone
>  gnus-treat-date-local nil
>  ;; Display the date in the original timezone
>  gnus-treat-date-original nil
>  ;; Strip trailing blank lines
>  gnus-treat-strip-trailing-blank-lines 'last
>  ;; Strip leading blank lines
>  gnus-treat-strip-leading-blank-lines 'last
>  ;; Strip multiple blank lines
>  gnus-treat-strip-multiple-blank-lines 'last
>  ;; Strip all blank lines
>  ;; gnus-treat-strip-blank-lines nil
>  ;; Treat overstrike highlighting
>  gnus-treat-overstrike 'last
>  )
> ;;* show the text/plain part before the text/html part in multpart/alternative
> (require 'mm-decode)
> ;;;-- no way do compile with this
> ;;;--(push "text/plain" mm-alternative-precedence)
> ;;;--(setq mm-alternative-precedence "text/plain")
>
> (message "gnus.el: MIME initialized")
>
> (setq smtpmail-default-smtp-server "mail.teledisnet.be")
> (setq send-mail-command 'smtpmail-send-it); For mail-mode (Rmail)
> (setq message-send-mail-function 'smtpmail-send-it); For message-mode
>                                         ; (Gnus)
> (setq message-signature 'my-signature)
> (setq gnus-signature-separator '("^-- $"))
>
> ;(setq gnus-secondary-select-methods '((nnml "private")))
>
> (setq mail-sources
> '((file)
> (pop :server "mail.ulg.ac.be"
>      :user "s083201")
> (pop :server "pop.swing.be"
>      :user "mluca")
> (pop :server "mail.teledisnet.be"
>      :user "lme04343")
> (pop :server "pop.free.fr"
>      :user "luca.merciadri")))
>
> (setq gnus-nntp-server nil
>       gnus-read-active-file nil
>       gnus-save-newsrc-file nil
>       gnus-read-newsrc-file nil
>       gnus-check-new-newsgroups nil)
>
> - --
>
> Thanks for your help.
>
> - --
> Merciadri Luca
> Seehttp://www.student.montefiore.ulg.ac.be/~merciadri/
> I use PGP. If there is an incompatibility problem with your mail
> client, please contact me.
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.4.9 (GNU/Linux)
> Comment: Processed by Mailcrypt 3.5.8 <http://mailcrypt.sourceforge.net/>
>
> iEYEARECAAYFAkp16OoACgkQM0LLzLt8MhyLCACcDPmHmP4y+ZKe8NcF0/B3wgzI
> 0kMAoJQxVqfSRqKISJy6luYe7wnYWoda
> =i61y
> -----END PGP SIGNATURE-----

In my .emacs, you can easily notice that if I uncomment
;(require 'epa-file)
;(epa-file-enable)
, the error comes.