branch: elpa/inf-clojure
commit 204e5b7adb965cfe64f454550afe9daad558ba0b
Author: Bozhidar Batsov <bozhi...@batsov.com>
Commit: Bozhidar Batsov <bozhi...@batsov.com>

    Do some cleanup in preparation for a major release
    
    * mark the defcustoms changed/introduced in this release
    * add obsolete aliases
    * bump the dev version to 2.0-snapshot
---
 inf-clojure.el | 80 +++++++++++++++++++++++++++++++++++++++++++---------------
 1 file changed, 60 insertions(+), 20 deletions(-)

diff --git a/inf-clojure.el b/inf-clojure.el
index d1fb535..f95d536 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -6,7 +6,7 @@
 ;;       Olin Shivers <shiv...@cs.cmu.edu>
 ;; URL: http://github.com/clojure-emacs/inf-clojure
 ;; Keywords: processes, clojure
-;; Version: 1.5.0-snapshot
+;; Version: 2.0.0-snapshot
 ;; Package-Requires: ((emacs "24.4") (clojure-mode "5.6"))
 
 ;; This file is part of GNU Emacs.
@@ -54,7 +54,7 @@
   :link '(url-link :tag "GitHub" 
"https://github.com/clojure-emacs/inf-clojure";)
   :link '(emacs-commentary-link :tag "Commentary" "inf-clojure"))
 
-(defconst inf-clojure-version "1.5.0-snapshot"
+(defconst inf-clojure-version "2.0.0-snapshot"
   "The current version of `inf-clojure'.")
 
 (defcustom inf-clojure-prompt-read-only t
@@ -163,7 +163,10 @@ of command, consisting of a host and port
 number (e.g. (\"localhost\" . 5555)).  That's useful if you're
 often connecting to a remote REPL process."
   :type '(choice (string)
-                 (cons string integer)))
+                 (cons string integer))
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-program 'inf-clojure-lein-cmd 
"2.0.0")
 
 (defcustom inf-clojure-boot-cmd "boot repl"
   "The command used to start a Clojure REPL for Boot projects.
@@ -173,7 +176,8 @@ of command, consisting of a host and port
 number (e.g. (\"localhost\" . 5555)).  That's useful if you're
 often connecting to a remote REPL process."
   :type '(choice (string)
-                 (cons string integer)))
+                 (cons string integer))
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defcustom inf-clojure-generic-cmd "lein repl"
   "The command used to start a Clojure REPL outside Lein/Boot projects.
@@ -183,7 +187,8 @@ of command, consisting of a host and port
 number (e.g. (\"localhost\" . 5555)).  That's useful if you're
 often connecting to a remote REPL process."
   :type '(choice (string)
-                 (cons string integer)))
+                 (cons string integer))
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defvar-local inf-clojure-repl-type nil
   "Symbol to define your REPL type.
@@ -214,7 +219,10 @@ be used instead of `comint-send-string`."
 This format string should use `%s' to substitute a file name and
 should result in a Clojure form that will be sent to the inferior
 Clojure to load that file."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-load-command 
'inf-clojure-load-form "2.0.0")
 
 (defcustom inf-clojure-prompt "^[^=> \n]+=> *"
   "Regexp to recognize prompts in the Inferior Clojure mode."
@@ -233,12 +241,14 @@ This should usually be a combination of 
`inf-clojure-prompt' and
 (defcustom inf-clojure-prompt-on-set-ns t
   "Controls whether to prompt when switching namespace."
   :type '(choice (const :tag "always" t)
-                 (const :tag "never" nil)))
+                 (const :tag "never" nil))
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defcustom inf-clojure-repl-use-same-window nil
   "Controls whether to display the REPL buffer in the current window or not."
   :type '(choice (const :tag "same" t)
-                 (const :tag "different" nil)))
+                 (const :tag "different" nil))
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defvar inf-clojure-buffer nil
   "The current inf-clojure process buffer.
@@ -565,12 +575,16 @@ The prefix argument SWITCH-TO-REPL controls whether to 
switch to REPL after the
 (defcustom inf-clojure-var-doc-form
   "(clojure.repl/doc %s)\n"
   "Form to query inferior Clojure for a var's documentation."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-var-doc-command 
'inf-clojure-var-doc-form "2.0.0")
 
 (defcustom inf-clojure-var-doc-form-lumo
   "(lumo.repl/doc %s)\n"
   "Lumo form to query inferior Clojure for a var's documentation."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defun inf-clojure-var-doc-form ()
   "Return the form to query inferior Clojure for a var's documentation.
@@ -583,7 +597,10 @@ If you are using REPL types, it will pickup the most 
approapriate
 (defcustom inf-clojure-var-source-form
   "(clojure.repl/source %s)\n"
   "Form to query inferior Clojure for a var's source."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-var-source-command 
'inf-clojure-var-source-form "2.0.0")
 
 (defcustom inf-clojure-arglist-form
   "(try
@@ -593,17 +610,24 @@ If you are using REPL types, it will pickup the most 
approapriate
         (clojure.core/read-string \"%s\"))))
      (catch Throwable t nil))\n"
   "Form to query inferior Clojure for a function's arglist."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-arglist-command 
'inf-clojure-arglist-form "2.0.0")
 
 (defcustom inf-clojure-completion-form
   "(complete.core/completions \"%s\")\n"
   "Form to query inferior Clojure for completion candidates."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-completion-command 
'inf-clojure-completion-form "2.0.0")
 
 (defcustom inf-clojure-completion-form-lumo
   "(doall (map str (lumo.repl/get-completions \"%s\")))\n"
   "Lumo form to query inferior Clojure for completion candidates."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defun inf-clojure-completion-form ()
   "Return the form to query inferior Clojure for a var's documentation.
@@ -616,28 +640,43 @@ If you are using REPL types, it will pickup the most 
approapriate
 (defcustom inf-clojure-ns-vars-form
   "(clojure.repl/dir %s)\n"
   "Form to show the public vars in a namespace."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-ns-vars-command 
'inf-clojure-ns-vars-form "2.0.0")
 
 (defcustom inf-clojure-set-ns-form
   "(clojure.core/in-ns '%s)\n"
   "Form to set the namespace of the inferior Clojure process."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-set-ns-command 
'inf-clojure-set-ns-form "2.0.0")
 
 (defcustom inf-clojure-apropos-form
   "(doseq [var (sort (clojure.repl/apropos \"%s\"))]
      (println (str var)))\n"
   "Form to invoke apropos."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-apropos-command 
'inf-clojure-apropos-form "2.0.0")
 
 (defcustom inf-clojure-macroexpand-form
   "(clojure.core/macroexpand '%s)\n"
   "Form to invoke macroexpand."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-macroexpand-command 
'inf-clojure-macroexpand-form "2.0.0")
 
 (defcustom inf-clojure-macroexpand-1-form
   "(clojure.core/macroexpand-1 '%s)\n"
   "Form to invoke macroexpand-1."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
+
+(define-obsolete-variable-alias 'inf-clojure-macroexpand-1-command 
'inf-clojure-macroexpand-1-form "2.0.0")
 
 ;;; Ancillary functions
 ;;; ===================
@@ -968,7 +1007,8 @@ for evaluation, therefore FORM should not include it."
 (defcustom inf-clojure--lumo-repl-form
   "(js/global.hasOwnProperty \"$$LUMO_GLOBALS\")"
   "Form to invoke in order to verify that we launched a Lumo REPL."
-  :type 'string)
+  :type 'string
+  :package-version '(inf-clojure . "2.0.0"))
 
 (defalias 'inf-clojure--lumo-p
   (apply-partially 'inf-clojure--response-match-p

Reply via email to