Move many functions to private namespace

Keep obsolete public aliases

Author: minad

gnuplot-context.el

@@ -275,13 +275,13 @@ If COMPLETING-P is non-nil, omits the token at point if it is a
 name; otherwise continues tokenizing up to the token at point.  FIXME."
   (let ((tokens '())
         (stop-point (min (point)
-                         (gnuplot-point-at-end-of-command))))
+                         (gnuplot--point-at-end-of-command))))
     (save-excursion
       (if (save-excursion               ; HACK FIXME
-            (gnuplot-beginning-of-continuation)
+            (gnuplot--beginning-of-continuation)
             (looking-at "\\s-*if\\s-*("))
-          (gnuplot-beginning-of-continuation)
-        (gnuplot-beginning-of-command))
+          (gnuplot--beginning-of-continuation)
+        (gnuplot--beginning-of-command))
       (while
           ;; Skip whitespace and continuation lines
           (progn
@@ -2060,7 +2060,7 @@ there."
 (defun gnuplot-context-completion-at-point ()
   "Return completions of keyword preceding point, using context."
   (list (save-excursion
-          (skip-syntax-backward "w_" (gnuplot-point-at-beginning-of-command))
+          (skip-syntax-backward "w_" (gnuplot--point-at-beginning-of-command))
           (point))
         (point)
         (gnuplot-completions)))
@@ -2176,7 +2176,7 @@ command."
     (catch 'result
       (while
           (search-backward-regexp "reset\\|set\\s-+parametric" (point-min) t)
-        (gnuplot-beginning-of-command)
+        (gnuplot--beginning-of-command)
         (cond ((looking-at "reset\\|unset\\s-+parametric") (throw 'result nil))
               ((looking-at "set\\s-+parametric") (throw 'result t))))
       nil)))

gnuplot-gui.el

@@ -842,7 +842,7 @@ Note that \"cntrparam\" is not currently supported."
   (interactive (list last-nonmenu-event))
   (save-excursion
     (if event (mouse-set-point event))
-    (let ((begin  (gnuplot-point-at-beginning-of-command))
+    (let ((begin  (gnuplot--point-at-beginning-of-command))
           (end    (save-excursion (end-of-line)       (point-marker)))
           (termin (concat "\\(,\\s-*" (regexp-quote "\\") "\\|;\\)"))
           (set nil) (term nil))

gnuplot-test-context.el

@@ -409,7 +409,7 @@
       (while (not (eobp))
         (let ((ln (line-number-at-pos))
               (tokens (progn
-                        (gnuplot-end-of-command)
+                        (gnuplot--end-of-command)
                         (gnuplot-tokenize))))
           (when (> (length tokens) 1)
             (let ((result
@@ -421,8 +421,8 @@
                   (cl-incf gnuplot-test-success-count)
                 (let ((cmd
                        (buffer-substring
-                        (gnuplot-point-at-beginning-of-command)
-                        (gnuplot-point-at-end-of-command))))
+                        (gnuplot--point-at-beginning-of-command)
+                        (gnuplot--point-at-end-of-command))))
                   (with-current-buffer
                       (get-buffer-create gnuplot-test-result-buffer)
                     (insert
@@ -431,7 +431,7 @@
                       (insert
                        (format "\tUNMATCHED TOKENS were: %s\n"
                                (gnuplot-simplify-tokens (car result)))))))))))
-        (gnuplot-beginning-of-defun -1)))))
+        (gnuplot--beginning-of-defun -1)))))
 
 (when (boundp 'compilation-error-regexp-alist-alist)
   (add-to-list 'compilation-error-regexp-alist-alist