# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1470969769 0
# Node ID a0fafd0adf192ce2ac2f10854b630fda9c6cd084
# Parent  134cfd7fa2fd95aeb758d816b18cf5815354b99d
Fix stupid bug

diff -r 134cfd7fa2fd -r a0fafd0adf19 beast.lisp
--- a/beast.lisp	Fri Aug 12 02:23:35 2016 +0000
+++ b/beast.lisp	Fri Aug 12 02:42:49 2016 +0000
@@ -108,7 +108,7 @@
   "))
 
 
-(defun create-entity (entity-class &rest initargs)
+(defun create-entity (class &rest initargs)
   "Create an entity of the given entity class and return it.
 
   `initargs` will be passed along to `make-instance`.