Daysleeper

Testing Emacs htmlize mode

 def receive_data data
      @tokenizer.extract(data).each do |stock_data|
        $data_log.info “———- #{stock_data}“
        @stock_data = UbacParser.new stock_data
        if @stock_data.valid_code?
          dispatch_request
        else
          send_error_without_callback “Invalid Protocol code”
        end
      end
    end

Emacs w3m package

w3m doesn’t come with GC library, so you must download and install it as an dependency.

If you don’t have GC, installed w3m will refuse to compile and you will be deprived from all the Emacs goodness of emacs-w3m mode.

You can download it from here:

GC home

Get rid of bugging prompts in Emacs

Don't you hate those stupid questions Emacs asks, when all you have to do is press enter to select the default choice.

I was using tags and it pissed me off that i must press enter each time to select the TAG.

Here is a quick fix for all such problems:

(defun soft-tag()
  (interactive)
  (find-tag (current-word))
(global-set-key "\M-." 'soft-tag)

Worked as a charm...and now i can show Hiran, Emacs does it too like Vi.

Emacs Wonders

What a beautiful modification of forward word and backward-word movement for Emacs.

I have just became a huge fan of it.

(defun geosoft-forward-word ()
   ;; Move one word forward. Leave the pointer at start of word
   ;; instead of emacs default end of word. Treat _ as part of word
   (interactive)
   (forward-char 1)
   (backward-word 1)
   (forward-word 2)
   (backward-word 1)
   (backward-char 1)
   (cond ((looking-at "_") (forward-char 1) (geosoft-forward-word))
         (t (forward-char 1))))
(defun geosoft-backward-word ()
   ;; Move one word backward. Leave the pointer at start of word
   ;; Treat _ as part of word
   (interactive)
   (backward-word 1)
   (backward-char 1)
   (cond ((looking-at "_") (geosoft-backward-word))
         (t (forward-char 1))))
(global-set-key "\M-f" 'geosoft-forward-word)
(global-set-key "\M-b" 'geosoft-backward-word)

Another macro is another Gem:

(defvar LIMIT 1)
(defvar time 0)
(defvar mylist nil)
(defun time-now ()
  (car (cdr (current-time))))
(defun bubble-buffer ()
  (interactive)
  (if (or (> (- (time-now) time) LIMIT) (null mylist))
      (progn (setq mylist (copy-alist (buffer-list)))
             (delq (get-buffer " *Minibuf-0*") mylist)
             (delq (get-buffer " *Minibuf-1*") mylist)))
  (bury-buffer (car mylist))
  (setq mylist (cdr mylist))
  (setq newtop (car mylist))
  (switch-to-buffer (car mylist))
  (setq rest (cdr (copy-alist mylist)))
  (while rest
    (bury-buffer (car rest))
    (setq rest (cdr rest)))
  (setq time (time-now)))
(global-set-key [f6] 'bubble-buffer)

Just trying setting them up in your .emacs file and you are ready to rock.

Another excellent package for those who long for visual bookmarking in emacs is package called visual bookmark.

Boy..i guess i am gonna dump...Arachno Ruby IDE completely now.