backward-symbol

[Andreas Roehler]

As `forward-syntax' and `forward-symbol' exist already,
these two functions--following scheme of backward-word
in simple.el--could be helpful.

Propose to integrate them into thingatpt.el


(defun backward-symbol (&optional arg)
 "Move backward until encountering the beginning of a symbol.
With argument, do this that many times."
 (interactive "p")
 (forward-symbol (- (or arg 1))))

(defun backward-same-syntax (&optional arg)
 "Move backward until encountering the beginning of a same-syntax.
With argument, do this that many times."
 (interactive "p")
 (forward-same-syntax (- (or arg 1))))

Thanks

__
Andreas Roehler