gEDA-cvs: gaf.git: branch: master updated (1.7.1-20110619-306-g5e557fd)

[git@xxxxxxxxxx]

The branch, master has been updated
       via  5e557fdfcb55b64dea1492df898785694f9ed155 (commit)
      from  56bbc20cce7409264ffde784fafcc62787afb52b (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.


=========
 Summary
=========

 gschem/scheme/gschem/deprecated.scm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)


=================
 Commit Messages
=================

commit 5e557fdfcb55b64dea1492df898785694f9ed155
Author: Peter TB Brett <peter@xxxxxxxxxxxxx>
Commit: Peter TB Brett <peter@xxxxxxxxxxxxx>

    scheme-api: Correct bug in set-attribute-value!
    
    Closes-bug: lp-908444

:100644 100644 bb69407... 33b7776... M	gschem/scheme/gschem/deprecated.scm

=========
 Changes
=========

commit 5e557fdfcb55b64dea1492df898785694f9ed155
Author: Peter TB Brett <peter@xxxxxxxxxxxxx>
Commit: Peter TB Brett <peter@xxxxxxxxxxxxx>

    scheme-api: Correct bug in set-attribute-value!
    
    Closes-bug: lp-908444

diff --git a/gschem/scheme/gschem/deprecated.scm b/gschem/scheme/gschem/deprecated.scm
index bb69407..33b7776 100644
--- a/gschem/scheme/gschem/deprecated.scm
+++ b/gschem/scheme/gschem/deprecated.scm
@@ -132,7 +132,7 @@
 (define-public (set-attribute-value! attrib value)
   (let ((params (text-info attrib))
         (name-value (parse-attrib attrib)))
-    (list-set! params 3 (simple-format "~A=~A" (car name-value) value))
+    (list-set! params 3 (simple-format #f "~A=~A" (car name-value) value))
     (apply set-text! attrib params)))
 
 ;; get-objects-in-page page




_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs