Add studlify-dwim to case-map

init.el

@@ -763,7 +763,13 @@ AKA, DO NOT USE THIS FUNCTION!!!"
     (:bind "c" #'capitalize-dwim
            "t" #'titlecase-dwim
            "u" #'upcase-dwim
-           "l" #'downcase-dwim))
+           "l" #'downcase-dwim
+           "s" (defun studlify-dwim (count)
+                 "Studlify region if active, or COUNT words if not."
+                 (interactive "*p")
+                 (if (region-active-p)
+                     (studlify-region (region-beginning) (region-end))
+                   (studlify-word count)))))
   
   (add-hook 'after-make-frame-functions
             (defun after-make-frame@maximize (frame)