lua-neturl: allow unserscore in domain name

Signed-off-by: Tianling Shen <cnsztl@immortalwrt.org>

lua-neturl/Makefile

@@ -1,12 +1,12 @@
 # SPDX-License-Identifier: GPL-3.0-only
 #
-# Copyright (C) 2022 ImmortalWrt.org
+# Copyright (C) 2022-2023 ImmortalWrt.org
 
 include $(TOPDIR)/rules.mk
 
 PKG_NAME:=neturl
 PKG_VERSION:=1.1-1
-PKG_RELEASE:=1
+PKG_RELEASE:=2
 
 PKG_SOURCE:=$(PKG_NAME)-$(PKG_VERSION).tar.gz
 PKG_SOURCE_URL:=https://codeload.github.com/golgote/neturl/tar.gz/v$(PKG_VERSION)?

lua-neturl/patches/010-userinfo-regex.patch

@@ -9,3 +9,12 @@
  			self.user = userinfo
  		else
  			-- incorrect userinfo
+@@ -369,7 +369,7 @@ function M.parse(url)
+ 		comp.fragment = v
+ 		return ''
+ 	end)
+-	url =url:gsub('^([%w][%w%+%-%.]*)%:', function(v)
++	url =url:gsub('^([%w][%p%w%+%-%.]*)%:', function(v)
+ 		comp.scheme = v:lower()
+ 		return ''
+ 	end)