global ln

ln.invoke_f = {
	local cvar
	cvar = ${ln.cvar.$0}
	if ($argc == 1) {
		echo "\"", $0, "\" is \"", $$cvar, "\""
		return
	}
	set $cvar $1
}

function "ln" {
	if ($argc != 3) {
		echo "usage: ln cvar cvar_alias"
		return
	}
	ln.cvar.$2 = $1
	function $2 ${ln.invoke_f}
	export $2
}

function::export ln

// QuakeForge		qwcl
ln "in_mouse_amp"	"sensitivity"
ln "in_grab"		"_windowed_mouse"
ln "joy_enable"		"joystick"
ln "con_alpha"		"gl_conalpha"
ln "con_width"		"vid_conwidth"
ln "con_height"		"vid_conheight"
ln "con_speed"		"scr_conspeed"

// QuakeForge		Old QuakeForge
ln "hud_fps"		"show_fps"
ln "hud_time"		"shot_time"
ln "hud_ping"		"show_ping"
ln "hud_pl"		"show_pl"
ln "hud_scoreboard_uid"	"show_scoreuid"