Update core.clj

Done again