Minor optomizations.
Optomization: using (seq expr) instead of (not (empty? expr))