Permalink
Browse files

compiles but is crippled

  • Loading branch information...
1 parent 7528efe commit 6225157156e7ff5cc6bdcd071761fc2240862e0c alfons haffmans committed Oct 24, 2010
Showing with 7 additions and 1 deletion.
  1. +3 −0 README.md
  2. +4 −1 elements.lisp
View
@@ -7,6 +7,9 @@
This is a clone of cl-twitter's darcs repository http://www.common-lisp.net/project/cl-twitter/darcs/cl-twitter.
More information can be found [on cl-twitters cliki page](http://common-lisp.net/project/cl-twitter/).
+This version compiles. Authentication does not work. Features which relay on that part obviously will not work.
+The search interface does work, but you're obviously going to be severly rate limited.
+
## Description
View
@@ -29,7 +29,7 @@
(eql (type-of inst) ',name))
(let ((args ',args))
(add-conversions args)
- (record-type-args name args)
+ (record-type-args ',name args)
(record-arg-descriptions ',name ,description args)))))
(eval-when (:compile-toplevel :load-toplevel)
@@ -95,6 +95,8 @@
(:method (response (prim-type (eql :identity)))
response))
+;;move to after register-twitter-object is defined
+
(defun parse-element-record (type rec embedded unique-p)
"Generic parsing function"
(let* ((lisprec (twitter->lisp-alist rec))
@@ -412,6 +414,7 @@ If the user has been logged in via basic authorization, returns
(defmethod print-object ((ref search-ref) stream)
(format stream "#<TWITTER-SEARCH-REF '~A'>" (search-ref-from-user ref)))
+
(defun lookup-search-ref (rec)
(declare (ignore rec)))

0 comments on commit 6225157

Please sign in to comment.