Index: trunk/Ohana/src/opihi/pcontrol/pcontrol.c
===================================================================
--- trunk/Ohana/src/opihi/pcontrol/pcontrol.c	(revision 4450)
+++ trunk/Ohana/src/opihi/pcontrol/pcontrol.c	(revision 4689)
@@ -7,17 +7,7 @@
 # define opihi_rcfile ".pcontrolrc"
 
-void InitPcontrol ();
-void InitBasic ();
-
-void welcome () {
-  fprintf (stderr, "\n");
-  fprintf (stderr, "Welcome to %s - %s\n\n", opihi_name, opihi_description);
-}
-
 /* program-dependent initialization */
 void initialize (int argc, char **argv) {
   
-  FILE *f;
-
   auto_break = TRUE;
 
@@ -39,4 +29,5 @@
   /* load the commands used by this implementation */
   InitBasic ();
+  InitData ();
   InitOutfile ();
   InitPcontrol ();
@@ -50,8 +41,17 @@
   set_str_variable ("PROMPT", opihi_prompt);
   set_str_variable ("RCFILE", opihi_rcfile);
+# ifdef HELPDIR_DEFAULT
+  set_str_variable ("HELPDIR", MACRO_NAME(HELPDIR_DEFAULT));
+# endif
 
   /* ignore the history file.  to change this, see, eg, mana.c */
   signal (SIGINT, SIG_IGN);
   return;
+}
+
+/* standard welcome message */
+void welcome () {
+  fprintf (stderr, "\n");
+  fprintf (stderr, "Welcome to %s - %s\n\n", opihi_name, opihi_description);
 }