CVS update by aidan packages/xemacs-packages/eshell ...

[email protected]
Newsgroups gmane.emacs.xemacs.cvs
Message-ID <[email protected]>
  User: aidan   
  Date: 09/02/02 00:22:12

  Modified:    packages/xemacs-packages/eshell ChangeLog em-hist.el
Log:
eshell-mode, non-defined variable 'eshell-save-history-on-exit.

Revision  Changes    Path
1.42      +8 -0      XEmacs/packages/xemacs-packages/eshell/ChangeLog

Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/eshell/ChangeLog,v
retrieving revision 1.41
retrieving revision 1.42
diff -u -p -r1.41 -r1.42
--- ChangeLog	2008/09/08 07:33:14	1.41
+++ ChangeLog	2009/02/01 23:22:10	1.42
@@ -1,3 +1,11 @@
+2009-01-25  It's me FKtPp ;)  <[email protected]>
+
+	* em-hist.el (eshell-save-history-on-exit): NEW. default to nil
+	* em-hist.el (eshell-hist-initialize): make
+	'eshell-save-history-on-exit buffer-local by default.
+	* em-hist.el (eshell-save-some-history): simplify the evaluation
+	logic.
+
 2008-09-08  Norbert Koch  <[email protected]>
 
 	* Makefile (VERSION): XEmacs package 1.16 released.



1.3       +4 -3      XEmacs/packages/xemacs-packages/eshell/em-hist.el

Index: em-hist.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/eshell/em-hist.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -p -r1.2 -r1.3
--- em-hist.el	2008/08/27 21:26:31	1.2
+++ em-hist.el	2009/02/01 23:22:10	1.3
@@ -187,6 +187,7 @@ element, regardless of any text on the c
 (defvar eshell-history-index nil)
 (defvar eshell-matching-input-from-input-string "")
 (defvar eshell-save-history-index nil)
+(defvar eshell-save-history-on-exit nil)
 
 (defvar eshell-isearch-map nil)
 
@@ -270,9 +271,10 @@ element, regardless of any text on the c
 
   (make-local-variable 'eshell-history-index)
   (make-local-variable 'eshell-save-history-index)
+  (make-local-variable 'eshell-save-history-on-exit)
 
   (if (minibuffer-window-active-p (selected-window))
-      (set (make-local-variable 'eshell-save-history-on-exit) nil)
+      (setq eshell-save-history-on-exit nil)
     (set (make-local-variable 'eshell-history-ring) nil)
     (if eshell-history-file-name
 	(eshell-read-history nil t))
@@ -299,8 +301,7 @@ element, regardless of any text on the c
 	(with-current-buffer buf
 	  (if (and eshell-mode
 		   eshell-history-file-name
-		   eshell-save-history-on-exit
-		   (or (eq eshell-save-history-on-exit t)
+		   (or eshell-save-history-on-exit
 		       (y-or-n-p
 			(format "Save input history for Eshell buffer `%s'? "
 				(buffer-name buf)))))
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.