DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download
Index: ┃ T e ┃

⟦83906aab7⟧ TextFile

    Length: 613 (0x265)
    Types: TextFile
    Names: »edit.c«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─ ⟦this⟧ »EUUGD11/euug-87hel/sec8/mcp/src/edit.c«

TextFile

#include <strings.h>
#include "sysdep.h"
#include "macros.h"
#include "mem.h"

char	*getenv();

edit(file)
char *file;

{
	char *av[4];
	char *term = getenv("TERM");
	char *visual = getenv("VISUAL");
	char *editor = getenv("EDITOR");
	char *which;

	if (!visual)
		visual = DEF_VISUAL;
	if (!editor)
		editor = DEF_EDITOR;
	if (!term)
		term = "dumb";

	if (eq(term, "dialup") || eq(term, "dumb"))
		which = editor;
	else if (eq(term, "network"))
		which = editor;
	else
		which = visual;

	av[0] = "shell-escape";
	av[1] = which;
	av[2] = file;
	av[3] = (char *)0;
	(void) shellescape(3, (addr *)av);
	return;
}