r := OpenResFileX(HOME & "Icon");
DefConst('kcite, GetPictAsBits("cite", nil));
CloseResFileX(r);



InstallScript := func (partFrame)
  begin
	call kRegNamesRouteScriptFunc with (kAppSymbol,
	{	GetTitle: func(target) begin
			if GetTargetCursor(target, nil):entry() then
				"Cite Card";
			else
				nil;	// no selections, so don't show in list
		end,
		icon: kcite,
		RouteScript: func(target, targetView) begin
			local curs:=GetTargetCursor(target, nil);
			getroot().(kappSymbol).citeCursor:=clone(curs);
			getroot().(kappSymbol):open();
		end
	});
  end;

RemoveScript:=func(partframe)
begin
	call kUnRegNamesRouteScriptFunc with (kAppSymbol);
end;