function! Mutt_edit(filename, previous_screen)
	let file = fnameescape(a:filename)
	exe "edit " . file
	if has("autocmd")
		exe "augroup Mutt"
		exe "autocmd!"
		exe "autocmd BufDelete " . file . ' exe system("screen -X select ' . a:previous_screen . ' ")'
		exe "augroup END"
	endif
endfunction