[nongnu] elpa/bison-mode 20b0c65 14/29: Removing some unused, un-namespaced utility functinos.

[ELPA Syncer]

branch: elpa/bison-mode
commit 20b0c65436e569945dcb028b0cee9a8024d95c19
Author: Wilfred Hughes <me@wilfred.me.uk>
Commit: Wilfred Hughes <me@wilfred.me.uk>

    Removing some unused, un-namespaced utility functinos.
---
 bison-mode.el | 17 -----------------
 1 file changed, 17 deletions(-)

diff --git a/bison-mode.el b/bison-mode.el
index 9e92ff4..d51eda7 100644
--- a/bison-mode.el
+++ b/bison-mode.el
@@ -161,12 +161,6 @@ key's electric variable")
 
 ;; *************** utilities ***************
 
-(defun same-line-p (pt1 pt2 &optional bol eol)
-  (let ((bol (or bol (save-excursion (beginning-of-line) (point))))
-       (eol (or eol (save-excursion (end-of-line) (point)))))
-    (and (<= bol pt1) (<= bol pt2)
-        (>= eol pt1) (>= eol pt2))))
-
 (defun just-no-space ()
   "Delete all spaces and tabs around point, leaving no spaces."
   (interactive "*")
@@ -174,13 +168,6 @@ key's electric variable")
   (delete-region (point) (progn (skip-chars-forward " \t") (point)))
   t)
 
-(defun white-space-separation (pt1 pt2)
-  "return t if there is nothing but whitespace between pt1 and pt2 not
-inclusive"
-  (save-excursion
-    (goto-char (+ pt1 1))
-    (not (re-search-forward "[^ \t\n]" pt2 t))))
-
 (defun previous-white-space-p ()
   "return t if there is whitespace between the beginning of the line and the
 current (point)"
@@ -215,10 +202,6 @@ and \(point\)"
       (beginning-of-line)      ;; should already be there anyway
       (not (re-search-forward "[^ \t\n]" eol t)))))
 
-
-(defun goto-next-non-ws ()
-  "goto and return pt of next non-whitespace character")
-
 ;; *************** bison-mode ***************
 
 ;;;###autoload