projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
2001-11-20 Simon Josefsson <jas@extundo.com>
[gnus]
/
lisp
/
gnus-gl.el
diff --git
a/lisp/gnus-gl.el
b/lisp/gnus-gl.el
index
d010793
..
4b5ba19
100644
(file)
--- a/
lisp/gnus-gl.el
+++ b/
lisp/gnus-gl.el
@@
-1,6
+1,6
@@
;;; gnus-gl.el --- an interface to GroupLens for Gnus
;;; gnus-gl.el --- an interface to GroupLens for Gnus
-;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000
+;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000
, 2001
;; Free Software Foundation, Inc.
;; Author: Brad Miller <bmiller@cs.umn.edu>
;; Free Software Foundation, Inc.
;; Author: Brad Miller <bmiller@cs.umn.edu>
@@
-131,7
+131,7
@@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar gnus-summary-grouplens-line-format
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar gnus-summary-grouplens-line-format
- "%U\%R\%z%l%I\%(%[%4L: %-2
0,20
n%]%) %s\n"
+ "%U\%R\%z%l%I\%(%[%4L: %-2
3,23
n%]%) %s\n"
"*The line format spec in summary GroupLens mode buffers.")
(defvar grouplens-pseudonym ""
"*The line format spec in summary GroupLens mode buffers.")
(defvar grouplens-pseudonym ""
@@
-632,10
+632,10
@@
recommend using both scores and grouplens predictions together."
(defun bbb-build-rate-command (rate-alist)
(concat "putratings " grouplens-bbb-token " " grouplens-current-group " \r\n"
(defun bbb-build-rate-command (rate-alist)
(concat "putratings " grouplens-bbb-token " " grouplens-current-group " \r\n"
- (mapconcat
'(lambda (this)
; form (mid . (score . time))
-
(concat (car this)
-
" :rating=" (cadr this) ".00"
-
" :time=" (cddr this)))
+ (mapconcat
(lambda (this)
; form (mid . (score . time))
+ (concat (car this)
+ " :rating=" (cadr this) ".00"
+ " :time=" (cddr this)))
rate-alist "\r\n")
"\r\n.\r\n"))
rate-alist "\r\n")
"\r\n.\r\n"))