diogenes-legacy.elc

;ELC
;;; Compiled
;;; in Emacs version 29.4
;;; with all optimizations.


#@40 Delete line numbers, starting at point
(defalias 'diogenes-delete-line-numbers #[0 "\212\300\301\302\303#\204
\304\301!\210\304\305!\210`\304\306\302\303#\204db\210\300\307!\210\310 \210\311u\210`\312\"\266\202)\207" [re-search-backward "([[:digit:]][[:digit:]][[:digit:]][[:digit:]]: [[:digit:]][[:digit:]][[:digit:]])" nil t re-search-forward "^$" "diogenes-browse finished" "[Α‐ω]" beginning-of-line 14 delete-rectangle] 5 (#$ . 83) nil])#@43 Post-processes search results of diogenes
(defalias 'diogenes-tidy-up-search-results #[0 "\212eb\210\300 \210eb\210\301\302\303\")\207" [diogenes-unhyphen-greek replace-regexp "->\\([[:alpha:]]*\\)<-\\([[:alpha:]]*\\)" "-> \\1\\2 -<"] 3 (#$ . 539) nil])
(provide 'diogenes-legacy)