# pre.rb $Revision: 1.0 $
#
# pre: <pre>を使ったブロックを生成する
#   パラメタ:
#     src:   <pre>ブロックのテキスト
#
# Copyright (C) 2003 by HIOSHIMA Naoki <http://www.iron-horse.org/~naokih/>
#
=begin ChangeLog
2003-10-08 HIROSHIMA Naoki
	* created.
=end

def pre( src )
	result = %Q[\n<p><code><pre>]
	result << src.gsub( /<p>/, '').gsub( /<\/p>/, '').chop
	result << %Q[\n</pre></code></p>\n]
	result
end