Mercurial > emacs

comparison lisp/env.el @ 807:4f28bd14272c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Eric S. Raymond <esr@snark.thyrsus.com>
date Thu, 16 Jul 1992 21:47:34 +0000
parents 7cbd4fcd8b0f
children 38b2499cb3e9
comparison
equal deleted inserted replaced
806:d42e1151eed8 807:4f28bd14272c
1 ;;; setenv.el --- functions to manipulate environment variables. 1 ;;; setenv.el --- functions to manipulate environment variables.
2
3 ;; Maintainer: FSF
4 ;; Last-Modified: 16 Mar 1992
2 5
3 ;;; Copyright Free Software Foundation 1991 6 ;;; Copyright Free Software Foundation 1991
4 7
5 ;;; This file is part of GNU Emacs. 8 ;;; This file is part of GNU Emacs.
6 9
7 ;;; GNU Emacs is free software; you can redistribute it and/or modify 10 ;;; GNU Emacs is free software; you can redistribute it and/or modify
8 ;;; it under the terms of the GNU General Public License as published by 11 ;;; it under the terms of the GNU General Public License as published by
9 ;;; the Free Software Foundation; either version 1, or (at your option) 12 ;;; the Free Software Foundation; either version 2, or (at your option)
10 ;;; any later version. 13 ;;; any later version.
11 14
12 ;;; GNU Emacs is distributed in the hope that it will be useful, 15 ;;; GNU Emacs is distributed in the hope that it will be useful,
13 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of 16 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
14 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 17 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 ;;; GNU General Public License for more details. 18 ;;; GNU General Public License for more details.
16 19
17 ;;; You should have received a copy of the GNU General Public License 20 ;;; You should have received a copy of the GNU General Public License
18 ;;; along with GNU Emacs; see the file COPYING. If not, write to 21 ;;; along with GNU Emacs; see the file COPYING. If not, write to
19 ;;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. 22 ;;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
23
24 ;;; Code:
20 25
21 (defun setenv (variable value) 26 (defun setenv (variable value)
22 "Set the value of the environment variable named VARIABLE to VALUE. 27 "Set the value of the environment variable named VARIABLE to VALUE.
23 VARIABLE and VALUE should both be strings. 28 VARIABLE and VALUE should both be strings.
24 This function works by modifying process-environment." 29 This function works by modifying process-environment."