Move hacks.el to contrib

Signed-off-by: Nils Gillmann <ng0@n0.is>

1 files changed, 0 insertions, 18 deletions

diff --git a/doc/hacks.el b/doc/hacks.el
deleted file mode 100644
index bfb5c98fa..000000000
--- a/doc/hacks.el
+++ /dev/null
@@ -1,18 +0,0 @@
-;;;; hacks.el --- a few functions to help me work on the manual
-;;;; Jim Blandy <jimb@red-bean.com> --- October 1998
-;;;; -- imported from https://git.savannah.gnu.org/cgit/guile.git/tree/doc/hacks.el
-;;;; This code should be covered by the same license as GNU Guile (GPL3).
-
-(defun jh-exemplify-region (start end)
-  (interactive "r")
-  (save-excursion
-    (save-restriction
-      (narrow-to-region start end)
-
-      ;; Texinfo doesn't handle tabs well.
-      (untabify (point-min) (point-max))
-
-      ;; Quote any characters special to texinfo.
-      (goto-char (point-min))
-      (while (re-search-forward "[{}@]" nil t)
-        (replace-match "@\\&")))))