# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 760229619 0
# Node ID 4555bdf89b40782006708ccc54c0b775ca4df471
# Parent  96f85cde2fb4ea08f2ff98f115e35a5d174248f5
(server-program): Add exec-directory to value.

diff -r 96f85cde2fb4 -r 4555bdf89b40 lisp/server.el
--- a/lisp/server.el	Wed Feb 02 22:35:44 1994 +0000
+++ b/lisp/server.el	Wed Feb 02 22:53:39 1994 +0000
@@ -73,8 +73,8 @@
 
 ;;; Code:
 
-(defvar server-program "emacsserver"
-  "*The program to use as the edit server")
+(defvar server-program (concat exec-directory "emacsserver")
+  "*The program to use as the edit server.")
 
 (defvar server-visit-hook nil
   "*List of hooks to call when visiting a file for the Emacs server.")