[elpa] 18/56: * man.el (Man-getpage-in-background): Always use `setenv' for environment variables, instead of modifying process-environment directly. The previous version let-bound process-environment -- the let-binding is skipped for GROFF_NO_SGR because there is already a let-binding in effect in some outer scope.

[Luke Lee]

lukelee pushed a commit to branch master
in repository elpa.

commit 3c33be70606ff4f352eea581f81bc9e479f7d768
Author: Kai Großjohann <kgros...@eu.uu.net>
Date:   Sun Mar 9 14:05:25 2003 +0000

    * man.el (Man-getpage-in-background): Always use `setenv' for environment 
variables, instead of modifying process-environment directly. The previous 
version let-bound process-environment -- the let-binding is skipped for 
GROFF_NO_SGR because there is already a let-binding in effect in some outer 
scope.
    
    * emulation/crisp.el (top-level): Interoperate with cua.
---
 lisp/emulation/crisp.el |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/lisp/emulation/crisp.el b/lisp/emulation/crisp.el
index 8a5410d..055c8e5 100644
--- a/lisp/emulation/crisp.el
+++ b/lisp/emulation/crisp.el
@@ -385,6 +385,12 @@ With ARG, turn CRiSP mode on if ARG is positive, off 
otherwise."
       (setq minor-mode-map-alist (cons (cons 'crisp-mode crisp-mode-map)
                                       minor-mode-map-alist))))
 
+;; Interaction with other packages.
+(eval-after-load 'cua
+  (progn
+    (add-to-list 'cua--standard-movement-commands 'crisp-home)
+    (add-to-list 'cua--standard-movement-commands 'crisp-end)))
+
 (run-hooks 'crisp-load-hook)
 (provide 'crisp)