(defun space-and-tabs-to-tab()
(interactive)
(while (re-search-forward "[\t ]+" nil t)
(replace-match "\t" nil nil)))
Ol’ MagDonkle [Comic]
12 hours ago
This site is now archived. My new coding posts are here http://justinhj.github.io
(defun space-and-tabs-to-tab()
(interactive)
(while (re-search-forward "[\t ]+" nil t)
(replace-match "\t" nil nil)))