summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'dev-lisp/cl-bouquet/files/0.1-package-lock-gentoo.patch')
-rw-r--r--dev-lisp/cl-bouquet/files/0.1-package-lock-gentoo.patch23
1 files changed, 23 insertions, 0 deletions
diff --git a/dev-lisp/cl-bouquet/files/0.1-package-lock-gentoo.patch b/dev-lisp/cl-bouquet/files/0.1-package-lock-gentoo.patch
new file mode 100644
index 000000000000..0f7f6d6d2be1
--- /dev/null
+++ b/dev-lisp/cl-bouquet/files/0.1-package-lock-gentoo.patch
@@ -0,0 +1,23 @@
+diff -ur bouquet.orig/bouquet.lisp bouquet/bouquet.lisp
+--- bouquet.orig/bouquet.lisp 2004-05-03 05:06:40.000000000 -0500
++++ bouquet/bouquet.lisp 2004-08-07 00:07:01.863133456 -0500
+@@ -100,8 +100,8 @@
+ :accessor edges)))
+
+ (defclass tulip-property ()
+- ((property-type :initarg :type
+- :accessor type)
++ ((property-type :initarg :property-type
++ :accessor property-type)
+ (cluster :initarg :cluster
+ :accessor cluster
+ :initform nil)
+@@ -189,7 +189,7 @@
+ (format stream
+ "(property ~D ~(~A~) ~S~%(default ~S ~S)~%~{(node ~D ~S)~%~}~{(edge ~D ~S)~%~})"
+ (if cluster (numeric-id cluster) 0)
+- (type property)
++ (property-type property)
+ name
+ (nodes-default property)
+ (edges-default property)