server/tun-*.c: Factor out the (very similar) TUN-like drivers.

[tripe] / server / tests.at

diff --git a/server/tests.at b/server/tests.at
index 1171fa221fcde53121dd8580fffe854f8153c1e6..510fd4d580194ddf0ce41479cffbdb7e019b4e91 100644 (file)
--- a/server/tests.at
+++ b/server/tests.at
@@ -152,7 +152,7 @@ $3
        {
          for (i = 0; i < npat; i++) {
            n = length(pat[[i]]);
-           if (substr($[]0, 0, n) == pat[[i]])
+           if (substr($[]0, 1, n) == pat[[i]])
              next;
          }
          print $[]0;