FIX: using split-lines native (until split will not be native as well)

Author: Oldes

src/mezz/prot-smtp.reb

@@ -154,7 +154,7 @@ sync-smtp-handler: function [event][
 			parse response [copy code: 3 digit to end (code: to integer! code)]
 
 			if system/options/log/smtp > 1 [
-				foreach line split trim/tail response CRLF [
+				foreach line split-lines trim/tail response [
 					sys/log/more 'SMTP ["Server:^[[32m" line]
 				]
 			]

src/mezz/sys-base.reb

@@ -237,7 +237,7 @@ log: func [
 ][
 	if error [
 		msg: form either block? msg [reduce msg][msg]
-		foreach line split msg #"^/" [
+		foreach line split-lines msg [
 			print ajoin [
 				" ^[[35m[" id "] ^[[1m"
 				either line/1 = #"*" []["** Error: "]