With the (bolp) check snipped, org-speed-commands
work up to the end of org-outline-regexp.


   (defun org-speed-command-activate (keys)
     (when (or (looking-at org-outline-regexp)
               (and (functionp org-use-speed-commands)
                    (funcall org-use-speed-commands)))
       (cdr (assoc keys (append org-speed-commands-user
org-speed-commands-default)))))

Works for me. Could this be legit --- or safer?

Thanks. m