From 7e842cfd399c0bea9d480d5fa7a18dfa06bb6a60 Mon Sep 17 00:00:00 2001 From: Luke Shumaker Date: Thu, 2 Jun 2011 23:19:42 -0400 Subject: This is what happens when I use Parabola for a day. --- .bashrc | 1 + .crontab | 2 ++ .emacs | 19 ++++++++++++++++--- .emacs.d/custom.el | 6 ++++++ .git.info.exclude | 9 ++++++++- .wl | 49 +++++++++++++++++++++++++++++++++++++++++++++++++ Makefile | 12 +++++++++++- 7 files changed, 93 insertions(+), 5 deletions(-) create mode 100644 .crontab create mode 100644 .wl diff --git a/.bashrc b/.bashrc index 9609bc2..161a9a4 100644 --- a/.bashrc +++ b/.bashrc @@ -37,6 +37,7 @@ esac # set a fancy prompt (non-color, unless we know we "want" color) case "$TERM" in + linux) color_prompt=yes;; *-color*) color_prompt=yes;; *-256color*) color_prompt=yes;; esac diff --git a/.crontab b/.crontab new file mode 100644 index 0000000..76e1537 --- /dev/null +++ b/.crontab @@ -0,0 +1,2 @@ +# m h dom mon dow command +*/5 * * * * offlineimap -u quiet diff --git a/.emacs b/.emacs index 532b70b..fbf4b84 100644 --- a/.emacs +++ b/.emacs @@ -1,5 +1,8 @@ (set-face-attribute 'default nil :height 80) +(setq custom-file "~/.emacs.d/custom.el") +(load custom-file 'noerror) + (defun load-identica-mode () (when (require 'netrc nil t) (autoload 'identica-mode "identica-mode" nil t) @@ -10,6 +13,19 @@ ) ) +(setq send-mail-function 'smtpmail-send-it) ; if you use `mail' +(setq message-send-mail-function 'smtpmail-send-it) ; if you use message/Gnus +(setq smtpmail-default-smtp-server "plus.smtp.mail.yahoo.com") ; set before loading library +(setq smtpmail-local-domain "lukeshu.ath.cx") +(setq smtpmail-sendto-domain "lukeshu.ath.cx") +(setq smtpmail-debug-info t) ; only to debug problems +(setq smtpmail-smtp-service 465) +(setq smtpmail-auth-credentials ; or use ~/.authinfo + '(("plus.smtp.mail.yahoo.com" 465 "lukeshu@sbcglobal.net" "oct30yahoo"))) +(setq smtpmail-starttls-credentials + '(("plus.smtp.mail.yahoo.com" 465 nil nil))) +(load-library "smtpmail") + (setq package-archives '(("ELPA" . "http://tromey.com/elpa/") ("marmalade" . "http://marmalade-repo.org/packages/") ("gnu" . "http://elpa.gnu.org/packages/"))) @@ -112,6 +128,3 @@ (setq browse-url-generic-program (executable-find "v-www-browser") browse-url-browser-function 'browse-url-generic) - -(setq custom-file "~/.emacs.d/custom.el") -(load custom-file 'noerror) diff --git a/.emacs.d/custom.el b/.emacs.d/custom.el index e69de29..d8fdce4 100644 --- a/.emacs.d/custom.el +++ b/.emacs.d/custom.el @@ -0,0 +1,6 @@ +(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. + '(scroll-bar-mode nil)) diff --git a/.git.info.exclude b/.git.info.exclude index 5d469b4..581f365 100644 --- a/.git.info.exclude +++ b/.git.info.exclude @@ -33,6 +33,7 @@ tmp .~lock.*# *_history *authority +*.cookie # Ignore these special-purpose cache/temp files .xsession-errors* @@ -63,9 +64,15 @@ tmp .pulse-cookie .pki +# Ignore files that are autogenerated +.folders +.nanorc + # Ignore these files for no good reason .terminfo .wine* .prefix .offlineimap - +.crontab.local +.elmo +.ido.last diff --git a/.wl b/.wl new file mode 100644 index 0000000..ae95926 --- /dev/null +++ b/.wl @@ -0,0 +1,49 @@ +;; mode:-*-emacs-lisp-*- + +;; wanderlust +(setq + elmo-maildir-folder-path "~/Maildir" ;; where I store my mail + + wl-stay-folder-window t ;; show the folder pane (left) + wl-folder-window-width 25 ;; toggle on/off with 'i' + + wl-smtp-posting-server "plus.smtp.mail.yahoo.com" + wl-smtp-posting-user "lukeshu@sbcglobal.net" + wl-message-id-domain "lukeshu@sbcglobal.net" ;; put a unique identifier here + wl-from "Luke Shumaker " ;; my From: + + wl-fcc-force-as-read t ;; mark sent messages as read + + ;; note: all below are dirs (Maildirs) under elmo-maildir-folder-path + ;; the '.'-prefix is for marking them as maildirs + wl-fcc "..Sent" ;; sent msgs go to the "sent"-folder + wl-default-folder "..Inbox" ;; my main inbox + wl-draft-folder "..Drafts" ;; store drafts in 'postponed' + wl-trash-folder "..Trash" ;; put trash in 'trash' + wl-spam-folder "..Bulk Mail" ;; put spam in 'Bulk Mail' + wl-queue-folder "..queue" ;; we don't use this + + ;; check this folder periodically, and update modeline + ;wl-biff-check-folder-list '(".todo") ;; check every 180 seconds + ;; (default: wl-biff-check-interval) + + wl-folder-hierarchy-access-folders '(".*") + + ;; hide many fields from message buffers + wl-message-ignored-field-list '("^.*:") + wl-message-visible-field-list + '("^\\(To\\|Cc\\):" + "^Subject:" + "^\\(From\\|Reply-To\\):" + "^Organization:" + "^Message-Id:" + "^\\(Posted\\|Date\\):" + ) + wl-message-sort-field-list + '("^From" + "^Organization:" + "^X-Attribution:" + "^Subject" + "^Date" + "^To" + "^Cc")) diff --git a/Makefile b/Makefile index 6d28864..6d2921b 100644 --- a/Makefile +++ b/Makefile @@ -1,12 +1,22 @@ CHECK = $(HOME)/.prefix:$(HOME):/usr/local:/usr:/ NANO_SHARE = $(firstword $(wildcard $(addsuffix /share/nano,$(subst :, ,$(CHECK))))) -all: .nanorc +targets=.nanorc .folders .crontab.cookie +all: $(targets) +clean: + rm -f $(targets) .nanorc: .nanorc.in $(NANO_SHARE) cat '$<' > '$@' for file in $(NANO_SHARE)/*.nanorc; do echo "include \"$$file\""; done >> '$@' +.folders: Maildir + find ~/Maildir -maxdepth 2 -type f -name "maildirfolder" -printf '%h\n'|sed -r 's@.*/(.*\.)(.*)@.\1\2@'>'$@' + +.crontab.cookie: .crontab .crontab.local + cat $^ | crontab + date > '$@' + commit: git commit -a -- cgit v1.1-4-g5e80