Updated message, as `install-mh' had been replaced by `mmh'.
[mmh] / sbr / context_read.c
index 1e795b0..600efab 100644 (file)
@@ -68,7 +68,7 @@ context_read(void)
        } else {
                mmhpath = concat(mypath, "/", mmhdir, NULL);
                if (stat(mmhpath, &st) == -1 || (st.st_mode & S_IFDIR) == 0) {
-                       adios(NULL, "Doesn't look like mmh is set up for your account.  Run `install-mh' to do so.");
+                       adios(NULL, "Doesn't look like mmh is set up for your account.  Run `mmh' to do so.");
                }
        }
 
@@ -173,4 +173,26 @@ context_read(void)
                readconfig((struct node **) 0, ib, cp, 1);
                lkfclose(ib, ctxpath);
        }
+
+       /* Set editor */
+       if (!(cp = getenv("MMHEDITOR")) || !*cp) {
+               if (!(cp = context_find("editor")) || !*cp) {
+                       if (!(cp = getenv("VISUAL")) || !*cp) {
+                               if (!(cp = getenv("EDITOR")) || !*cp) {
+                                       cp = defaulteditor;
+                               }
+                       }
+               }
+       }
+       defaulteditor = cp;
+
+       /* Set pager */
+       if (!(cp = getenv("MMHPAGER")) || !*cp) {
+               if (!(cp = context_find("pager")) || !*cp) {
+                       if (!(cp = getenv("PAGER")) || !*cp) {
+                               cp = defaultpager;
+                       }
+               }
+       }
+       defaultpager = cp;
 }