Ticket #14799: patch-src_port1.0_portlint.tcl

Index: src/port1.0/portlint.tcl
===================================================================
--- src/port1.0/portlint.tcl    (revision 35355)
+++ src/port1.0/portlint.tcl    (working copy)
@@ -195,17 +195,17 @@
             set require_blank false
         }
 
-        if {$require_blank && ($line != "")} {
-            ui_warn "Line $lineno should be a newline (after $require_after)"
-            incr warnings
-        }
+        # if {$require_blank && ($line != "")} {
+        #     ui_warn "Line $lineno should be a newline (after $require_after)"
+        #     incr warnings
+        # }
         set require_blank false
 
-        if {[regexp {\S[ \t]+$} $line]} {
-            # allow indented blank lines between blocks of code and such
-            ui_warn "Line $lineno has trailing whitespace before newline"
-            incr warnings
-        }
+        # if {[regexp {\S[ \t]+$} $line]} {
+        #     # allow indented blank lines between blocks of code and such
+        #     ui_warn "Line $lineno has trailing whitespace before newline"
+        #     incr warnings
+        # }
 
         if {($lineno == $topline_number) && [string match "*-\*- *" $line]} {
             ui_info "OK: Line $lineno has emacs/vim Mode"
@@ -475,8 +475,8 @@
 
     if {[info exists patchfiles]} {
         foreach patchfile $patchfiles {
-            if {![string match "patch-*.diff" $patchfile] && [file exists "$portpath/files/$patchfile"]} {
-                ui_warn "Patchfile $patchfile does not follow the source patch naming policy \"patch-*.diff\""
+            if {![string match "patch-*" $patchfile] && [file exists "$portpath/files/$patchfile"]} {
+                ui_warn "Patchfile $patchfile does not follow the source patch naming policy \"patch-*\""
                 incr warnings
             }
         }