(setenv): Renamed back from putenv.

1 files changed, 1 insertions, 4 deletions

diff --git a/lisp/env.el b/lisp/env.el
index 145c164ddde..256a3338e60 100644
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -31,7 +31,7 @@
 ;;; Code:
 
 ;;;###autoload
-(defun putenv (variable &optional value)
+(defun setenv (variable &optional value)
   "Set the value of the environment variable named VARIABLE to VALUE.
 VARIABLE should be a string.  VALUE is optional; if not provided or is
 `nil', the environment variable VARIABLE will be removed.  
@@ -52,9 +52,6 @@ This function works by modifying `process-environment'."
           (setq process-environment
                 (cons (concat variable "=" value) process-environment))))))))
 
-;; Provide backward-contemptibility. 
-(fset 'setenv 'putenv)
-
 (provide 'env)
 
 ;;; env.el ends here