 
 (defun bbj:timestring (epoch)
   "Make a cute timestring out of the epoch (for post heads)"
-  (format-time-string "%H:%M %a %m/%d/%y" epoch))
+  (format-time-string "%H:%M %a %m/%d/%y" (seconds-to-time epoch)))
 
 
 (defun bbj:render-post (object)



(defun bbj:render-tag-span (dom)
  "A slightly modified version of `shr-tag-span' which handles quotes and stuff.."
  (let ((class (dom-attr dom 'class)))
    (dolist (sub (dom-children dom))
      (if (stringp sub)
          (cond
           ((equal class "quote")

(require 'json)
(require 'cl)

(defvar bbj:host "localhost")
(defvar bbj:port "7066")
(defvar bbj:width 80)

;; blah blah user servicable parts blah blaheiu hre  ;;;;;;;;;;r;r;r;r;;;q;q;;;
(defvar bbj:old-p (eq emacs-major-version 24))
(defvar bbj:logged-in nil)
(defvar bbj:user nil)
(defvar bbj:hash nil)
