File less-424b-shell.patch of Package less

--- filename.c
+++ filename.c
@@ -560,7 +560,7 @@
 #if HAVE_SHELL
 	char *shell;
 
-	shell = lgetenv("SHELL");
+	shell = lgetenv("LESSSHELL");
 	if (shell != NULL && *shell != '\0')
 	{
 		char *scmd;
--- less.hlp
+++ less.hlp
@@ -94,7 +94,7 @@
   ___<_n_a_m_e_>             Display the setting of an option, by name.
   +_c_m_d                 Execute the less cmd each time a new file is examined.
 
-  !_c_o_m_m_a_n_d             Execute the shell command with $SHELL.
+  !_c_o_m_m_a_n_d             Execute the shell command with $LESSSHELL.
   |XX_c_o_m_m_a_n_d            Pipe file between current pos & mark XX to shell command.
   v                    Edit the current file with $VISUAL or $EDITOR.
   V                    Print version number of "less".
--- less.nro
+++ less.nro
@@ -376,7 +376,7 @@
 A pound sign (#) is replaced by the name of the previously examined file.
 "!!" repeats the last shell command.
 "!" with no shell command simply invokes a shell.
-On Unix systems, the shell is taken from the environment variable SHELL,
+On Unix systems, the shell is taken from the environment variable LESSSHELL,
 or defaults to "sh".
 On MS-DOS and OS/2 systems, the shell is the normal command processor.
 .IP "| <m> shell-command"
@@ -1561,7 +1561,7 @@
 .IP PATH
 User's search path (used to find a lesskey file 
 on MS-DOS and OS/2 systems).
-.IP SHELL
+.IP LESSSHELL
 The shell used to execute the ! command, as well as to expand filenames.
 .IP TERM
 The type of terminal on which
--- lsystem.c
+++ lsystem.c
@@ -124,7 +124,7 @@
 	 */
 #if HAVE_SHELL
 	p = NULL;
-	if ((shell = lgetenv("SHELL")) != NULL && *shell != '\0')
+	if ((shell = lgetenv("LESSSHELL")) != NULL && *shell != '\0')
 	{
 		if (*cmd == '\0')
 			p = save(shell);