Update core.clj

Minor update