Use homenv variable instead of getenv(HOME) 3 times in do_rcfile

git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@1466 35c25a1d-7b9e-4130-9fde-d3aeb78583b8

diff --git a/rcfile.c b/rcfile.c
index 829a1efb2c6d7a6a76607f8228b69026345f447b..6b2204fea9704dffd12f47c1d40a1d49e9563993 100644 (file)
--- a/rcfile.c
+++ b/rcfile.c
@@ -622,6 +622,7 @@ void do_rcfile(void)
     FILE *rcstream;
     const struct passwd *userage;
     uid_t euid = geteuid();
+    char *homenv = getenv("HOME");
 
 #ifdef SYSCONFDIR
     assert(sizeof(SYSCONFDIR) == strlen(SYSCONFDIR) + 1);
@@ -638,9 +639,9 @@ void do_rcfile(void)
     lineno = 0;
 
     /* Rely on $HOME, fall back on getpwuid() */
-    if (getenv("HOME") != NULL) {
-       nanorc = nrealloc(nanorc, strlen(getenv("HOME")) + 10);
-       sprintf(nanorc, "%s/.nanorc", getenv("HOME"));
+    if (homenv != NULL) {
+       nanorc = nrealloc(nanorc, strlen(homenv) + 10);
+       sprintf(nanorc, "%s/.nanorc", homenv);
     } else {
        userage = getpwuid(euid);
        endpwent();