Suppose I have this text, where | is point.
This is the te|xt.
Now I want to put the word text in bold, so I use Org keybindings and do C-c C-x C-f and pick *. This is what happens:
This is the te *|* xt.
Would it be possible to have the markers surround the symbol where point is? Like this:
This is the *text*|.
I know org-emphasize works on the active region, but it would be quicker if it was done automatically on the symbol where point is.
You just need a function that marks the current word when the region isn't already active:
(defun org-emphasize-dwim (&optional char) (interactive) (unless (region-active-p) (backward-word) (mark-word)) (org-emphasize char)) You can rebind the keys to call this instead of the normal org-emphasize:
(define-key org-mode-map [remap org-emphasize] #'org-emphasize-dwim) I use something like this:
(defun bold-region-or-point () (interactive) (if (region-active-p) (progn (goto-char (region-end)) (insert "*") (goto-char (region-beginning)) (insert "*")) (insert "**") (backward-char))) and bind it to a convenient key like:
(define-key global-map (kbd "s-b") 'bold-region-or-point) 