X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/5b0a2bdbdeabfd02923a9998e6e2dafa614b47f3..239fa5bd3dff0b38b0cebdd3438311f21c24ba4f:/src/pset-proto.lisp

diff --git a/src/pset-proto.lisp b/src/pset-proto.lisp
index e10e8b9..aafa306 100644
--- a/src/pset-proto.lisp
+++ b/src/pset-proto.lisp
@@ -42,7 +42,7 @@ (export 'property-type)
 (defgeneric property-type (value)
   (:documentation "Guess a sensible property type to use for VALUE.")
   (:method ((value symbol)) :symbol)
-  (:method ((value integer)) :integer)
+  (:method ((value integer)) :int)
   (:method ((value string)) :string)
   (:method ((value character)) :char)
   (:method (value) :other))