20120424--jwd

UPDATED arbollocks-moce, g0client, magit, org-mode, package24, paredit
JayDugger · Apr 25, 2012 · 442a88f · 442a88f
1 parent 43a61f4
commit 442a88f
Show file tree

Hide file tree

Showing 87 changed files with 7,273 additions and 3,313 deletions.
diff --git a/el-get/artbollocks-mode/artbollocks-mode.elc b/el-get/artbollocks-mode/artbollocks-mode.elc
diff --git a/el-get/g-client/.svn/all-wcprops b/el-get/g-client/.svn/all-wcprops
@@ -1,7 +1,7 @@
 K 25
 svn:wc:ra_dav:version-url
 V 38
-/svn/!svn/ver/7705/trunk/lisp/g-client
+/svn/!svn/ver/7708/trunk/lisp/g-client
 END
 g-autogen.el
 K 25
@@ -105,42 +105,42 @@ svn:wc:ra_dav:version-url
 V 54
 /svn/!svn/ver/5798/trunk/lisp/g-client/indent-files.el
 END
-g-utils.el
-K 25
-svn:wc:ra_dav:version-url
-V 49
-/svn/!svn/ver/7562/trunk/lisp/g-client/g-utils.el
-END
-gcal-view.xsl
+gbooks.el
 K 25
 svn:wc:ra_dav:version-url
-V 52
-/svn/!svn/ver/4400/trunk/lisp/g-client/gcal-view.xsl
+V 48
+/svn/!svn/ver/7610/trunk/lisp/g-client/gbooks.el
 END
 gweb.el
 K 25
 svn:wc:ra_dav:version-url
 V 46
 /svn/!svn/ver/7570/trunk/lisp/g-client/gweb.el
 END
-gbooks.el
+gcal-view.xsl
 K 25
 svn:wc:ra_dav:version-url
-V 48
-/svn/!svn/ver/7610/trunk/lisp/g-client/gbooks.el
+V 52
+/svn/!svn/ver/4400/trunk/lisp/g-client/gcal-view.xsl
 END
-g-auth.el
+g-utils.el
 K 25
 svn:wc:ra_dav:version-url
-V 48
-/svn/!svn/ver/7705/trunk/lisp/g-client/g-auth.el
+V 49
+/svn/!svn/ver/7562/trunk/lisp/g-client/g-utils.el
 END
 gcontacts.el
 K 25
 svn:wc:ra_dav:version-url
 V 51
 /svn/!svn/ver/6356/trunk/lisp/g-client/gcontacts.el
 END
+g-auth.el
+K 25
+svn:wc:ra_dav:version-url
+V 48
+/svn/!svn/ver/7708/trunk/lisp/g-client/g-auth.el
+END
 g.el
 K 25
 svn:wc:ra_dav:version-url

diff --git a/el-get/g-client/.svn/entries b/el-get/g-client/.svn/entries
@@ -1,14 +1,14 @@
 10
 
 dir
-7705
+7715
 https://emacspeak.googlecode.com/svn/trunk/lisp/g-client
 https://emacspeak.googlecode.com/svn
 
 
 
-2012-04-19T16:17:22.950741Z
-7705
+2012-04-22T20:33:52.136048Z
+7708
 tv.raman.tv
 has-props
 
@@ -440,16 +440,16 @@ tv.raman.tv
 
 8555
 
-COPYING
+gwis.el
 file
 
 
 
 
 2012-03-07T14:35:36.000000Z
-3672263b6ce4708efef3ed59a697d881
-2007-03-02T00:44:27.471985Z
-4400
+ab073ba532e75deb0364e3954206acb5
+2009-10-29T15:16:50.119641Z
+6353
 tv.raman.tv
 
 
@@ -472,18 +472,18 @@ tv.raman.tv
 
 
 
-3280
+7225
 
-gwis.el
+COPYING
 file
 
 
 
 
 2012-03-07T14:35:36.000000Z
-ab073ba532e75deb0364e3954206acb5
-2009-10-29T15:16:50.119641Z
-6353
+3672263b6ce4708efef3ed59a697d881
+2007-03-02T00:44:27.471985Z
+4400
 tv.raman.tv
 
 
@@ -506,7 +506,7 @@ tv.raman.tv
 
 
 
-7225
+3280
 
 Makefile
 file
@@ -610,18 +610,17 @@ has-props
 
 842
 
-g-utils.el
+gbooks.el
 file
 
 
 
 
-2012-03-09T15:59:46.000000Z
-55adf934e99dffc8f4e7f52e3d69c393
-2012-03-08T16:55:53.385863Z
-7562
+2012-03-27T15:20:11.000000Z
+793c4d001c9dbdab732496e05b904e6a
+2012-03-25T16:33:52.539622Z
+7610
 tv.raman.tv
-has-props
 
 
 
@@ -642,19 +641,21 @@ has-props
 
 
 
-12729
+
+5519
 
-gcal-view.xsl
+gweb.el
 file
 
 
 
 
-2012-03-07T14:35:36.000000Z
-d01d63f852d848bdc417df5da43458a6
-2007-03-02T00:44:27.471985Z
-4400
+2012-03-14T13:46:50.000000Z
+3854c550831fde7211d1c8ff1f80b04a
+2012-03-11T16:20:35.582664Z
+7570
 tv.raman.tv
+has-props
 
 
 
@@ -675,21 +676,19 @@ tv.raman.tv
 
 
 
-
-912
+14858
 
-gweb.el
+gcal-view.xsl
 file
 
 
 
 
-2012-03-14T13:46:50.000000Z
-3854c550831fde7211d1c8ff1f80b04a
-2012-03-11T16:20:35.582664Z
-7570
+2012-03-07T14:35:36.000000Z
+d01d63f852d848bdc417df5da43458a6
+2007-03-02T00:44:27.471985Z
+4400
 tv.raman.tv
-has-props
 
 
 
@@ -710,19 +709,21 @@ has-props
 
 
 
-14858
+
+912
 
-gbooks.el
+g-utils.el
 file
 
 
 
 
-2012-03-27T15:20:11.000000Z
-793c4d001c9dbdab732496e05b904e6a
-2012-03-25T16:33:52.539622Z
-7610
+2012-03-09T15:59:46.000000Z
+55adf934e99dffc8f4e7f52e3d69c393
+2012-03-08T16:55:53.385863Z
+7562
 tv.raman.tv
+has-props
 
 
 
@@ -743,21 +744,19 @@ tv.raman.tv
 
 
 
-
-5519
+12729
 
-g-auth.el
+gcontacts.el
 file
 
 
 
 
-2012-04-20T14:29:33.000000Z
-08a1bd673fe41812175e75ae05f3c756
-2012-04-19T16:17:22.950741Z
-7705
+2012-03-07T14:35:36.000000Z
+870b4658a5891296ceb2691bb05b8b9a
+2009-10-31T17:57:56.653370Z
+6356
 tv.raman.tv
-has-props
 
 
 
@@ -778,19 +777,21 @@ has-props
 
 
 
-8619
+
+5104
 
-gcontacts.el
+g-auth.el
 file
 
 
 
 
-2012-03-07T14:35:36.000000Z
-870b4658a5891296ceb2691bb05b8b9a
-2009-10-31T17:57:56.653370Z
-6356
+2012-04-25T00:05:42.000000Z
+64301aad7966749064a77a4130d8a868
+2012-04-22T20:33:52.136048Z
+7708
 tv.raman.tv
+has-props
 
 
 
@@ -811,8 +812,7 @@ tv.raman.tv
 
 
 
-
-5104
+7571
 
 g.el
 file

diff --git a/el-get/g-client/.svn/text-base/g-auth.el.svn-base b/el-get/g-client/.svn/text-base/g-auth.el.svn-base
@@ -158,40 +158,21 @@
 ;;}}}
 ;;{{{ G Authenticate
 
-(defun g-get-user-credentials (service)
-  (let* ((auth-source-creation-prompts 
-          '((user . "Google E-Mail: ")
-            (secret . "Google Password: ")))
-         (found (nth 0 (auth-source-search :max 1
-                                           :host "www.google.com"
-                                           :port service
-                                           :require '(:user :secret)
-                                           :create t))))
-    (if found
-        (list (plist-get found :user)
-              (let ((secret (plist-get found :secret)))
-                (if (functionp secret)
-                    (funcall secret)
-                  secret))
-              (plist-get found :save-function))
-      nil)))
-
 (defun g-authenticate (auth-handle)
   "Authenticate    using credentials in auth-handle.
 Populate auth-handle with the returned cookies and token."
   (declare (special g-auth-scratch-buffer g-curl-program
                     g-curl-common-options
                     g-user-email))
   (let* ((post-auth-action (g-auth-post-auth-action auth-handle))
-         (user-credentials (g-get-user-credentials (g-auth-service auth-handle)))
          (email (or (g-auth-email auth-handle)
-                    (nth 0 user-credentials)
+                    g-user-email
                     (read-from-minibuffer "User Address: ")))
-         (password (or (g-auth-password auth-handle)
-                       (nth 1 user-credentials)
-                       (read-passwd
-                        (format "Password for %s:"
-                                email))))
+         (password
+          (or (g-auth-password auth-handle)
+              (read-passwd
+               (format "Password for %s:"
+                       email))))
          (buff (get-buffer-create g-auth-scratch-buffer))
          (fields nil))
     (setf (g-auth-email auth-handle) email
@@ -226,9 +207,6 @@ Populate auth-handle with the returned cookies and token."
                  (fboundp post-auth-action))
         (funcall post-auth-action auth-handle))
       (setf (g-auth-timestamp auth-handle) (current-time))
-      (when (and (functionp (nth 2 user-credentials))
-                 (not (g-auth-expired-p auth-handle)))
-        (funcall (nth 2 user-credentials)))
       auth-handle)))
 
 (defun g-auth-ensure-token (auth-handle)

diff --git a/el-get/g-client/g-app.elc b/el-get/g-client/g-app.elc