fix: actually open files when one is found
This commit is contained in:
		
							parent
							
								
									c90710f31b
								
							
						
					
					
						commit
						9942e063b3
					
				| @ -162,9 +162,9 @@ empty, all files are to be looked for." | |||||||
|     (when arg |     (when arg | ||||||
|       (setq dir (read-file-name "Root directory: ")) |       (setq dir (read-file-name "Root directory: ")) | ||||||
|       (setq ext (read-string "File extension (leave blank for all files): "))) |       (setq ext (read-string "File extension (leave blank for all files): "))) | ||||||
|     (funcall quick-find-files-completing-read |     (find-file (funcall quick-find-files-completing-read | ||||||
|                         "Open file: " |                         "Open file: " | ||||||
|              (quick-find-files-list-files dir ext)))) |                         (quick-find-files-list-files dir ext))))) | ||||||
| 
 | 
 | ||||||
|                                         ; Provides ;;;;;;;;;;;;;;;;;;;;;;;;;;;; |                                         ; Provides ;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ||||||
| 
 | 
 | ||||||
|  | |||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user