chiark
/
gitweb
/
~mdw
/
clg
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
2e10ba8
)
Bug fix
author
espen
<espen>
Mon, 10 Apr 2006 18:38:42 +0000
(18:38 +0000)
committer
espen
<espen>
Mon, 10 Apr 2006 18:38:42 +0000
(18:38 +0000)
gdk/gdk.lisp
patch
|
blob
|
blame
|
history
diff --git
a/gdk/gdk.lisp
b/gdk/gdk.lisp
index 5012e40fb8e411307457b1ee04390d613cfa7c09..65303a9e128b778d33e219f1f206942af0a2f46b 100644
(file)
--- a/
gdk/gdk.lisp
+++ b/
gdk/gdk.lisp
@@
-20,7
+20,7
@@
;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-;; $Id: gdk.lisp,v 1.2
3 2006/04/10 18:27:58
espen Exp $
+;; $Id: gdk.lisp,v 1.2
4 2006/04/10 18:38:42
espen Exp $
(in-package "GDK")
(in-package "GDK")
@@
-531,7
+531,7
@@
(defmethod initialize-instance ((color color) &rest initargs
(defbinding color-parse (spec &optional (make-instance 'color)) boolean
(spec string)
(defbinding color-parse (spec &optional (make-instance 'color)) boolean
(spec string)
- (color color :
in/
return))
+ (color color :return))
(defun ensure-color (color)
(etypecase color
(defun ensure-color (color)
(etypecase color