From mboxrd@z Thu Jan 1 00:00:00 1970 From: stardiviner Subject: [PATCH] ob-clojure-literate don't enable minor mode by default. Date: Thu, 03 May 2018 10:26:28 +0800 Message-ID: <87efito4ob.fsf@gmail.com> Reply-To: numbchild@gmail.com Mime-Version: 1.0 Content-Type: multipart/signed; boundary="==-=-="; micalg=pgp-sha256; protocol="application/pgp-signature" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:52039) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fE3xG-0008H9-8g for emacs-orgmode@gnu.org; Wed, 02 May 2018 22:26:47 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1fE3xB-0005Wt-QQ for emacs-orgmode@gnu.org; Wed, 02 May 2018 22:26:46 -0400 Received: from [183.249.134.109] (port=13931 helo=dark.localdomain) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1fE3xB-0005VO-9T for emacs-orgmode@gnu.org; Wed, 02 May 2018 22:26:41 -0400 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: org-mode --==-=-= Content-Type: multipart/mixed; boundary="=-=-=" --=-=-= Content-Type: text/plain Hi, Nicolas, can you merge this minor update? thanks. --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-ob-clojure-literate.el-Don-t-enable-ob-clojure-liter.patch Content-Transfer-Encoding: quoted-printable From=2014cad029e92b1e35b1255e4b7faa3f0442bce334 Mon Sep 17 00:00:00 2001 From: stardiviner Date: Thu, 3 May 2018 10:20:41 +0800 Subject: [PATCH] ob-clojure-literate.el: Don't enable ob-clojure-literate-m= ode by default. * contrib/lisp/ob-clojure-literate.el (ob-clojure-literate-auto-jackin): Handle the case that detect cider-jack-in is executed but not connected, and ob-clojure-literate-mode is enabled already. * contrib/lisp/ob-clojure-literate.el (ob-clojure-literate-mode): Don't enable ob-clojure-literate-mode by default. =2D-- contrib/lisp/ob-clojure-literate.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/contrib/lisp/ob-clojure-literate.el b/contrib/lisp/ob-clojure-= literate.el index e702582d9..19eceba52 100644 =2D-- a/contrib/lisp/ob-clojure-literate.el +++ b/contrib/lisp/ob-clojure-literate.el @@ -67,6 +67,7 @@ If it is a directory, `ob-clojure-literate' will try to c= reate Clojure project a ;; get global value instead of buffer local. (default-value 'cider-connections))) =20 +;;; allow not "ob-clojure" project session name. (defun ob-clojure-literate-set-session () "Set session name for buffer local." ;; if default session is the only one in connections list. @@ -124,7 +125,8 @@ If it is a directory, `ob-clojure-literate' will try to= create Clojure project a (if (not (null ob-clojure-literate-session)) (seq-contains cider-connections (get-buffer ob-clojure-literate-se= ssion)))) cider-connections =2D (not (null ob-clojure-literate-session))) + (ob-clojure-literate-any-connection-p) + ) ;; return back to original file. (if (not (and (=3D (length (ob-clojure-literate-get-session-list)) 1) (member ob-clojure-literate-default-session (ob-clojur= e-literate-get-session-list)))) @@ -334,7 +336,7 @@ reset `RESULT' to `nil'." (define-minor-mode ob-clojure-literate-mode "A minor mode to toggle `ob-clojure-literate'." :require 'ob-clojure-literate =2D :init-value t + :init-value nil :lighter " clj-lp" :group 'ob-clojure-literate :keymap ob-clojure-literate-mode-map =2D-=20 2.17.0 --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable =2D-=20 [ stardiviner ] don't need to convince with trends. Blog: https://stardiviner.github.io/ IRC(freenode): stardiviner GPG: F09F650D7D674819892591401B5DF1C95AE89AC3 =20=20=20=20=20=20 --=-=-=-- --==-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEE8J9lDX1nSBmJJZFAG13xyVromsMFAlrqc1UACgkQG13xyVro msMsYggAmWtDveppBTsYtkOgRWT7eCzt8vje/vROfLwyWMSgC7dD/c1L11UkT2Yr l0aUFj+9QCdFkaIZZAPfZbKXXI95fyfUpPVdlZWRm09GK5AzERQ1ao2VOc1S1D7o EaaGWg7PSj9OomsdC5rJ5NwuOYo4/pM5ZU2nq4QYuY0nHarMPiGTSPgpYAUz3oYW xAomGpLMWisbUD/NJUhyZuAZzOBvBQvtZlBE5TxBk1ZCYQjZ3TlBAj8L3ihSukDU 7FDq5+38dbBEcBKzKu0WeKtWDmFRIcxGO9y4ezw/3VW5r45EaG3Ztf8WVpwKPhl8 1c3vmuw5dCrUU5PKHNXqgZRBdRoyfw== =zwOE -----END PGP SIGNATURE----- --==-=-=--