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