Merge branch 'upstream'

[pkg/t-prot.git] / contrib / t-prot.sl-slang2.diff

diff --git a/contrib/t-prot.sl-slang2.diff b/contrib/t-prot.sl-slang2.diff
new file mode 100644 (file)
index 0000000..0635ff7
--- /dev/null
+++ b/contrib/t-prot.sl-slang2.diff
@@ -0,0 +1,44 @@
+Patch 2005-12-23 by Gregor Herrmann, making t-prot.sl run with slang2.
+His comment:
+
+| After some fiddling around and reading manuals I found a workaround:
+| replace "error" by "message".
+| I don't know if this is the canonical solution but at least the
+| errors are gone :-)
+
+
+--- t-prot.sl.2.0.2-1  2005-12-23 19:20:43.000000000 +0100
++++ t-prot.sl  2005-12-23 19:21:24.000000000 +0100
+@@ -73,3 +73,3 @@
+       if (f == NULL) {
+-              error ("Unable to filter article to "+fname);
++              message ("Unable to filter article to "+fname);
+               return;
+@@ -82,3 +82,3 @@
+       if (f == NULL) {
+-              error (fname+" could not be opened.");
++              message (fname+" could not be opened.");
+               return;
+@@ -90,3 +90,3 @@
+ 
+-      if (0 != remove(fname)) error ("Unable to remove "+fname);
++      if (0 != remove(fname)) message ("Unable to remove "+fname);
+ 
+@@ -97,6 +97,6 @@
+       if (1 == register_hook("read_article_hook", "t_prot")) {
+-              error("t-prot filtering activated");
++              message ("t-prot filtering activated");
+       }
+       else {
+-              error("t-prot filtering NOT activated");
++              message ("t-prot filtering NOT activated");
+       }
+@@ -106,6 +106,6 @@
+       if (1 == unregister_hook("read_article_hook", "t_prot")) {
+-              error("t-prot filtering deactivated");
++              message ("t-prot filtering deactivated");
+       }
+       else {
+-              error("t-prot filtering NOT deactivated");
++              message ("t-prot filtering NOT deactivated");
+       }