Tuesday, May 26, 2009

Org mode as a day planner

This is an article about how to use Org-mode as a day planner. I saw it on the org-mode homepage and it is a well thought out, well written article. Replete with examples that make sense and pretty code blocks, it offers several tips I'm going to start using. Such as multiple states and notes per state change.

Tuesday, May 19, 2009

Gnus scoring

One really should go read this and then you can do things like


(setq gnus-summary-mark-below 0)

so that you stop getting emails in your Summary buffer from people that you really don't want to see anymore.

At least that's the plan.

Sunday, May 17, 2009

todochiku.el

Having been able to get something working in gnus, my next step is to get a notification in growl/snarl etc. To that end this should help move that along.

Spamassassin and gnus.

Here is some information on how to get spamassassin to work with gnus. Well, actually it's a conf file, so if you don't get those yet, drop me a line.

Thursday, May 14, 2009

xcite.el - citations



(require 'xcite)
(autoload 'xcite "xcite" "Exciting cite" t)
(autoload 'xcite-yank-cur-msg "xcite" "Exciting cite" t)
(autoload 'xcite-indent-citation "xcite")
;;(setq message-citation-line-function nil message-citation-line-function 'xcite-indent-citation)
(setq message-citation-line-function nil
message-indent-citation-function
'xcite-indent-citation)

(defun default-custom-header ()
(format "On %s %s%s wrote:\n"
date (or handle "") (if id (concat " (" id ")" ) "")))
(setq xcite:insert-header-function 'default-custom-header)


How to get my citation "on blah blah so and so wrote:" in xcite for citations.

So far so good. I'm only using the basic version, nothing too tricked out
and it puts in the name of the user as part of the "> wrote something. Ans etc etc" part of the mail body.

Wednesday, May 13, 2009

bbdb

After installing and fighting bbdb for a bit, the following worked in my .gnus.el

Under my first hook:


(require 'bbdb)
(bbdb-initialize)
(add-hook 'gnus-startup-hook 'bbdb-insinuate-gnus)
(add-hook 'gnus-startup-hook 'bbdb-insinuate-message)



Then to save a person to the db, you use ':'
and to mail them, in the To: field hit to complete the name

Tuesday, May 12, 2009

.newsrc.eld

If your summary is screwed up, best chances are that this has the offending summary line.

addenda

added imap searching

require 'nnir



(setq gnus-select-method '(nnimap "imap.gmail.com"
(nnimap-address "imap.gmail.com")
(nnimap-server-port 993)
(nnimap-authinfo-file "~/.authinfo")
(nnir-search-engine imap)
(nnimap-stream ssl)))



my .gnus.el

using .authinfo with


machine imap.gmail.com login livingood.pw@gmail.com password passwordoffun port 993
machine smtp.gmail.com login livingood.pw@gmail.com password passwordoffun port 587


and then


(setq user-mail-address "livingood.pw@gmail.com")
(setq user-full-name "Ben Livingood")
(load-library "smtpmail")
(load-library "nnimap")
(load-library "starttls")
(setq gnus-select-method '(nnimap "imap.gmail.com"
(nnimap-address "imap.gmail.com")
(nnimap-server-port 993)
(nnimap-authinfo-file "~/.authinfo")
(nnimap-stream ssl)))

(setq smtpmail-starttls-credentials '(("smtp.gmail.com" 587 nil nil))
smtpmail-smtp-server "smtp.gmail.com"
smtpmail-default-smtp-server "smtp.gmail.com"
send-mail-function 'smtpmail-send-it
message-send-mail-function 'smtpmail-send-it
smtpmail-smtp-service 587
;; smtpmail-auth-credentials '(("smtp.gmail.com"
;; 587
;; "livingood.pw@gmail.com"
;; nil))
)
(add-hook 'gnus-topic-mode-hook 'gnus-topic-mode)

(setq gnus-invalid-group-regexp "[:`'\"]\\|^$")
(setq gnus-ignored-newsgroups "")
(setq gnus-outgoing-message-group "[Google Mail]/Sent Mail")


then S s for each group I want
oh and G c to set them always visible

to see all messages read or not, C-u RET on a group

now if there was a way to tag mails in gnus so I could perform an op on multiple messages. . .

Monday, May 11, 2009

My .emacs from a portable ubuntu distro @home


(add-to-list 'load-path "~/.emacs.d/")
(require 'rcirc)
(require 'rcirc-extension)
;; (require 'twit)

(global-set-key (kbd "C-c b") 'browse-url-at-point)
(global-set-key (kbd "C-c ") 'shrink-window-horizontally)
(global-set-key (kbd "C-c ") 'enlarge-window-horizontally)
(global-set-key (kbd "C-c ") 'shrink-window)
(global-set-key (kbd "C-c ") 'enlarge-window)

(defun-rcirc-command reconnect (arg)
"Reconnect the server process."
(interactive "i")
(unless process
(error "There's no process for this target"))
(let* ((server (car (process-contact process)))
(port (process-contact process :service))
(nick (rcirc-nick process))
channels query-buffers)
(dolist (buf (buffer-list))
(with-current-buffer buf
(when (eq process (rcirc-buffer-process))
(remove-hook 'change-major-mode-hook
'rcirc-change-major-mode-hook)
(if (rcirc-channel-p rcirc-target)
(setq channels (cons rcirc-target channels))
(setq query-buffers (cons buf query-buffers))))))
(delete-process process)
(rcirc-connect server port nick
nick
nick
channels)))

(ido-mode)
(windmove-default-keybindings)

(menu-bar-mode)
(tool-bar-mode)
;;; This was installed by package-install.el.
;;; This provides support for the package system and
;;; interfacing with ELPA, the package archive.
;;; Move this code earlier if you want to reference
;;; packages in your .emacs.
(when
(load
(expand-file-name "~/.emacs.d/elpa/package.el"))
(package-initialize))

;; To install, add the following to your .emacs file:
(autoload 'kill-ring-search "kill-ring-search"
;; "Search the kill ring in the minibuffer."
(interactive))
(global-set-key "\M-\C-y" 'kill-ring-search)
;;
;; Just call kill-ring-search and enter your search.
;; M-y and C-y work as usual. You can also use C-r like in a shell.
;; C-v, M-v, C-n and C-p will scroll the view.

;; emacs-fu
(blink-cursor-mode nil) ;; stop cursor from blinking
(setq search-highlight t ;; highlight when searching...
query-replace-highlight t)

(setq save-place-file "~/.emacs.d/saveplace") ;; keep my ~/ clean
(setq-default save-place t) ;; activate it for all buffers
(require 'saveplace) ;; get the package

(setq savehist-additional-variables ;; also save...
'(search-ring regexp-search-ring kill-ring) ;; ... my search entries
savehist-file "~/.emacs.d/savehist") ;; keep my home clean
(savehist-mode t) ;; do customization before activate

(push '("." . "~/.emacs.d/savefiles") backup-directory-alist)

;; mark current line:
(global-hl-line-mode 1)
;; color for current line:
(set-face-background 'hl-line "#e0f8ff")


Tuesday, May 05, 2009

3.5pre5

Using firefox 3.5pre5 with scribefire, twitterfox, treetabs, and ubuiquity.

And, so far, it hasn't died a horrible death. Highly recommended.