Combine WordPress blog posts

This function combines a series of WordPress blog posts into a single buffer. Start the function on a blog post. The function stops when it cannot find a link to the next blog post.

# Combine WordPress blog posts.
# usage: <wpblog
function:wpblog {
db0
H-
sw+
e/temporary buffer for function wpblog to use
if(*) {
eret
p temporary buffer already exists
} else {
enew
f temporary buffer for function wpblog to use
M0
js-
ub
if(?) {
}
while(*) {
,s/\(>\)\(\t<\/header>.*\)/$1\n$2/gf
/<header class="entry-header">/f+X
.,/<\/header>/f-w/temporary buffer for function wpblog to use@$
/<div class="entry-content">/f+X
.,/<div id="atatags-/f-w/temporary buffer for function wpblog to use@$
if(?) {
.,/<div id="jp-post-flair"/f-w/temporary buffer for function wpblog to use@$
}
/<div id="comments"/f+X
if(*) {
.,/<div id="respond" class="comment-respond">/f-w/temporary buffer for function wpblog to use@$
}
,s/\(.\)\(<a \)/$1\n$2/gf
/<a .*rel="next">/f g-
}
e/temporary buffer for function wpblog to use
g/^\t*$/fd
g/<h2[^>]*>$/fj
# Some WordPress blogs use this id, so we remove each such id to avoid having the id more than once.
,s/<h2 id="comments-title">/<h2>/gf
bw
eret
enew
r/temporary buffer for function wpblog to use
q/temporary buffer for function wpblog to use
bw
}
}