HCoop
/
bpt
/
guile.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
*** empty log message ***
[bpt/guile.git]
/
emacs
/
gds-scheme.el
diff --git
a/emacs/gds-scheme.el
b/emacs/gds-scheme.el
index
8fb4ca2
..
134e805
100755
(executable)
--- a/
emacs/gds-scheme.el
+++ b/
emacs/gds-scheme.el
@@
-158,7
+158,7
@@
Emacs to display an error or trap so that the user can debug it."
(default nil))
;; Prepare a table containing all current clients.
(mapcar (lambda (client-info)
(default nil))
;; Prepare a table containing all current clients.
(mapcar (lambda (client-info)
- (setq table (cons (cons (cadr (
ass
q 'name client-info))
+ (setq table (cons (cons (cadr (
mem
q 'name client-info))
(car client-info))
table)))
gds-client-info)
(car client-info))
table)))
gds-client-info)