summaryrefslogtreecommitdiff
path: root/Lisp
diff options
context:
space:
mode:
Diffstat (limited to 'Lisp')
-rw-r--r--Lisp/class-definition.lisp2
-rw-r--r--Lisp/name-conversion.lisp2
2 files changed, 2 insertions, 2 deletions
diff --git a/Lisp/class-definition.lisp b/Lisp/class-definition.lisp
index b8e23e4..9229270 100644
--- a/Lisp/class-definition.lisp
+++ b/Lisp/class-definition.lisp
@@ -286,5 +286,5 @@
(nothing :accessor ns-string-nothing
:initarg :ns-string
:initform 100))
- (:metaclass objective-c-classes::%ns-string)
+ (:metaclass objective-c-classes::+ns-string)
(:wrapped-foreign-class "NSString"))
diff --git a/Lisp/name-conversion.lisp b/Lisp/name-conversion.lisp
index 0c294fb..55ea829 100644
--- a/Lisp/name-conversion.lisp
+++ b/Lisp/name-conversion.lisp
@@ -112,7 +112,7 @@
(export-and-return
(read-from-string
(concatenate 'string
- "%"
+ "+"
(symbol-name (objc-class-name->symbol meta-class-name)))))))