1
0
mirror of https://github.com/rfivet/uemacs.git synced 2024-11-17 18:16:22 -05:00

Avoid extra empty line at EOF.

This commit is contained in:
Renaud 2021-07-19 16:37:57 +08:00
parent 00b85fab9f
commit f0fe1ec194

View File

@ -3,8 +3,7 @@ insert-string &cat $curwidth &cat "x" $pagelen
insert-string &rig "---------+" &sub 10 $curcol insert-string &rig "---------+" &sub 10 $curcol
&sub &div $curwidth 10 1 insert-string "---------+" &sub &div $curwidth 10 1 insert-string "---------+"
insert-string &lef "1234567890" &mod $curwidth 10 insert-string &lef "1234567890" &mod $curwidth 10
end-of-file &sub $pagelen 3 execute-command-line "insert-string &cat ~n &add $curline 1"
&sub $pagelen 3 execute-command-line "insert-string &cat $curline ~n"
beginning-of-file beginning-of-file
unmark-buffer unmark-buffer
write-message $line write-message $line