Paste2

allowpastecube = 0
pastecube = [
	sleep 15 [
	if (= $allowpastecube 1) [
			paste
		]
	] pastecube
]
pastecube

bind q [edittoggle; allowpastecube = 1; onrelease [allowpastecube = 0; edittoggle;]];