1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | (defun lines() (progn (punch) (query-replace-regexp "||lines" (concat "<div class='highlightShow'>\n" "<ul>\n" "<li><em>Line 1</em> - </li>\n" "<li><em>Line 1</em> - </li>\n" "<li><em>Line 1</em> - </li>\n" "</ul>\n" "</div>\n" ) ) ) ) (defun punch() (progn (other-window 1) ) ) ;; ================================================== ;; (lines) |