cli: fix hiding of redundant source scripts when a .com/.exe exists
Related to #1225.
This commit is contained in:
		
							parent
							
								
									1428291dd6
								
							
						
					
					
						commit
						a016a43785
					
				@ -649,8 +649,8 @@ hledgerAddons = do
 | 
				
			|||||||
stripPrognamePrefix = drop (length progname + 1)
 | 
					stripPrognamePrefix = drop (length progname + 1)
 | 
				
			||||||
 | 
					
 | 
				
			||||||
dropRedundantSourceVersion [f,g]
 | 
					dropRedundantSourceVersion [f,g]
 | 
				
			||||||
  | takeExtension f `elem` compiledExts = [f]
 | 
					  | map toLower (takeExtension f) `elem` compiledExts = [f]
 | 
				
			||||||
  | takeExtension g `elem` compiledExts = [g]
 | 
					  | map toLower (takeExtension g) `elem` compiledExts = [g]
 | 
				
			||||||
dropRedundantSourceVersion fs = fs
 | 
					dropRedundantSourceVersion fs = fs
 | 
				
			||||||
 | 
					
 | 
				
			||||||
compiledExts = ["",".com",".exe"]
 | 
					compiledExts = ["",".com",".exe"]
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
		Reference in New Issue
	
	Block a user