diff options
Diffstat (limited to 'lib-src')
| -rw-r--r-- | lib-src/emacsclient.c | 33 |
1 files changed, 13 insertions, 20 deletions
diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c index 85415eba44a..b6d33c9c2c2 100644 --- a/lib-src/emacsclient.c +++ b/lib-src/emacsclient.c | |||
| @@ -695,26 +695,19 @@ To start the server in Emacs, type \"M-x server-start\".\n", | |||
| 695 | fprintf (out, "-version %s ", VERSION); | 695 | fprintf (out, "-version %s ", VERSION); |
| 696 | 696 | ||
| 697 | /* Send over our environment. */ | 697 | /* Send over our environment. */ |
| 698 | { | 698 | if (!current_frame) |
| 699 | extern char **environ; | 699 | { |
| 700 | int i; | 700 | extern char **environ; |
| 701 | for (i = 0; environ[i]; i++) | 701 | int i; |
| 702 | { | 702 | for (i = 0; environ[i]; i++) |
| 703 | char *name = xstrdup (environ[i]); | 703 | { |
| 704 | char *value = strchr (name, '='); | 704 | char *name = xstrdup (environ[i]); |
| 705 | if (value && strlen (value) > 1) | 705 | char *value = strchr (name, '='); |
| 706 | { | 706 | fprintf (out, "-env "); |
| 707 | *value++ = 0; | 707 | quote_argument (environ[i], out); |
| 708 | fprintf (out, "-env "); | 708 | fprintf (out, " "); |
| 709 | quote_argument (name, out); | 709 | } |
| 710 | fprintf (out, " "); | 710 | } |
| 711 | quote_argument (value, out); | ||
| 712 | fprintf (out, " "); | ||
| 713 | fflush (out); | ||
| 714 | } | ||
| 715 | free (name); | ||
| 716 | } | ||
| 717 | } | ||
| 718 | 711 | ||
| 719 | retry: | 712 | retry: |
| 720 | if (nowait) | 713 | if (nowait) |