mirror of
				https://github.com/larstvei/dot-emacs.git
				synced 2025-11-04 01:20:11 +00:00 
			
		
		
		
	Fix duplicate-thing for long lines
This commit is contained in:
		
							parent
							
								
									ea7083c205
								
							
						
					
					
						commit
						faabaa958b
					
				
							
								
								
									
										3
									
								
								init.org
									
									
									
									
									
								
							
							
						
						
									
										3
									
								
								init.org
									
									
									
									
									
								
							@ -766,7 +766,8 @@
 | 
			
		||||
     (interactive "P")
 | 
			
		||||
     (save-excursion
 | 
			
		||||
       (let ((start (if (region-active-p) (region-beginning) (point-at-bol)))
 | 
			
		||||
             (end   (if (region-active-p) (region-end) (point-at-eol))))
 | 
			
		||||
             (end   (if (region-active-p) (region-end) (point-at-eol)))
 | 
			
		||||
             (fill-column most-positive-fixnum))
 | 
			
		||||
         (goto-char end)
 | 
			
		||||
         (unless (region-active-p)
 | 
			
		||||
           (newline))
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user