Fix finding company list header in embedded sorting script
This commit is contained in:
		
							parent
							
								
									5490e1b7ec
								
							
						
					
					
						commit
						7520c8f1d4
					
				@ -4,7 +4,7 @@
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
#+begin_src emacs-lisp :exports none
 | 
					#+begin_src emacs-lisp :exports none
 | 
				
			||||||
  (save-excursion
 | 
					  (save-excursion
 | 
				
			||||||
    (search-forward "* Companies" nil t)
 | 
					    (search-forward-regexp "^\* Companies" nil t)
 | 
				
			||||||
    (beginning-of-line)
 | 
					    (beginning-of-line)
 | 
				
			||||||
    (org-sort-entries nil ?a)
 | 
					    (org-sort-entries nil ?a)
 | 
				
			||||||
    )
 | 
					    )
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user