def print_properties
s = ""
@properties.each do |key,val|
if key =~ /ip_.*/
key = key[3..-1]
end
unless multiline_property?(key)
prelude = "#{key.gsub(/_/, '-').upcase}" +
print_parameters(val)
value = ":#{val.to_ical}"
escaped = prelude + value.gsub("\\", "\\\\").gsub("\n", "\\n").gsub(",", "\\,").gsub(";", "\\;")
s << escaped.slice!(0, MAX_LINE_LENGTH) << "\r\n " while escaped.size > MAX_LINE_LENGTH
s << escaped << "\r\n"
s.gsub!(/ *$/, '')
else
prelude = "#{key.gsub(/_/, '-').upcase}"
val.each do |v|
params = print_parameters(v)
value = ":#{v.to_ical}"
escaped = prelude + params + value.gsub("\\", "\\\\").gsub("\n", "\\n").gsub(",", "\\,").gsub(";", "\\;")
s << escaped.slice!(0, MAX_LINE_LENGTH) << "\r\n " while escaped.size > MAX_LINE_LENGTH
s << escaped << "\r\n"
s.gsub!(/ *$/, '')
end
end
end
s
end