зеркало из
				https://github.com/iharh/notes.git
				synced 2025-10-31 05:36:08 +02:00 
			
		
		
		
	
		
			
				
	
	
		
			13 строки
		
	
	
		
			211 B
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
			
		
		
	
	
			13 строки
		
	
	
		
			211 B
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
| (kill-buffer "*scratch*")
 | |
| 
 | |
| ;; Remove completion buffer when done
 | |
| (add-hook 'minibuffer-exit-hook
 | |
| 	'(lambda ()
 | |
| 		(let ((buffer "*Completions*"))
 | |
| 			(and (get-buffer buffer)
 | |
| 				(kill-buffer buffer)
 | |
| 			)
 | |
| 		)
 | |
| 	)
 | |
| )
 | 
