oldk1331
unread,Jun 26, 2019, 3:19:44 AM6/26/19Sign in to reply to author
Sign in to forward
You do not have permission to delete messages in this group
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to fricas...@googlegroups.com
Remove those hard coded default value for $AXIOM.
diff --git a/src/hyper/htadd.c b/src/hyper/htadd.c
index 3b4c1e6b..a63cffd1 100644
--- a/src/hyper/htadd.c
+++ b/src/hyper/htadd.c
@@ -211,9 +211,8 @@
if (flag & System) {
SPAD = (char *) getenv("AXIOM");
if (SPAD == NULL) {
- fprintf(stderr,
- "Build_db_filename: Defaulting on $AXIOM\n");
- SPAD = (char *) def_spad;
+ fprintf(stderr, "build_db_filename: $AXIOM is empty\n");
+ exit(-1);
}
sprintf(dbfilename, "%s/share/hypertex/pages/%s", SPAD,
db_file_name);
sprintf(path, "%s/share/hypertex/pages", SPAD);
diff --git a/src/hyper/hyper.h b/src/hyper/hyper.h
index fcfffd2a..7ce6fc3e 100644
--- a/src/hyper/hyper.h
+++ b/src/hyper/hyper.h
@@ -447,7 +447,6 @@
#define NoChar -9999
#define temp_dir "/tmp/"
#define db_file_name "ht.db"
-#define def_spad "/usr/local/fricas"
/* Types of HyperDoc pages */
diff --git a/src/hyper/spadint.c b/src/hyper/spadint.c
index 9ca1208e..da460309 100644
--- a/src/hyper/spadint.c
+++ b/src/hyper/spadint.c
@@ -190,7 +190,8 @@
SPAD = (char *) getenv("AXIOM");
if (SPAD == NULL) {
- sprintf(SPAD, "/spad/mnt/rios");
+ fprintf(stderr, "start_user_buffer: $AXIOM is empty\n");
+ exit(-1);
}
sprintf(spadbuf, "%s/lib/spadbuf", SPAD);
sprintf(complfile, "%s/lib/command.list", SPAD);