mirror of
				https://github.com/janet-lang/janet
				synced 2025-10-27 13:47:42 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			8 lines
		
	
	
		
			279 B
		
	
	
	
		
			Janet
		
	
	
	
	
	
			
		
		
	
	
			8 lines
		
	
	
		
			279 B
		
	
	
	
		
			Janet
		
	
	
	
	
	
| # Remove carriage returns from file. Since piping things on 
 | |
| # windows may add bad line endings, we can just force removal
 | |
| # with this script.
 | |
| (def fname ((dyn :args) 1))
 | |
| (def source (slurp fname))
 | |
| (def new-source (string/replace-all "\r" "" source))
 | |
| (spit fname new-source :wb)
 | 
