snippetsmania.com
Post and share your code snippets

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Insert a BASE HREF tag just after the head tag of an HTML document
;; Positions point just after the second forwardslash in "HTTP://"

(fset 'insert-base-href
[?M-< ?C-s ?< ?h ?e ?a ?d ?C-e return return return up ?< ?b ?a ?s ?e ?  ?h ?r ?e ?f ?= ?" ?h ?t ?t ?p ?: ?/ ?/ ?" ?> left left])

source