;; Author: Steve Youngs <steve@sxemacs.org>
;; Maintainer: Steve Youngs <steve@sxemacs.org>
;; Created: <2007-12-02>
-;; Time-stamp: <Friday Aug 16, 2013 14:15:30 steve>
+;; Time-stamp: <Saturday Aug 17, 2013 11:29:15 steve>
;; Download: <http://bastard.steveyoungs.com/~steve/SXEmacs/inits/>
;; HTMLised: <http://bastard.steveyoungs.com/~steve/SXEmacs/htmlinits/15-supercite-sy.html>
;; Git Repo: git clone http://git.sxemacs.org/syinit
(require 'supercite)
(require 'time-date)
+;; There is a screw-up in the Gnus autoloads that prevents this from
+;; being autoloaded
+(defun time-to-seconds (time)
+ "Convert time value TIME to a floating point number."
+ (with-decoded-time-value ((high low micro pico type time))
+ (+ (* 1.0 high 65536)
+ low
+ (/ (+ (* micro 1e6) pico) 1e12))))
+
(defun sy-september-citation-line ()
(let ((sc-mumble "")
(whofrom (sc-whofrom)))