From cd8f55fc4d83e06cb8a1dd17dbb120fb2601d16d Mon Sep 17 00:00:00 2001
From: ptt <ptt@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>
Date: Wed, 2 Jul 2003 13:53:10 +0000
Subject: *** empty log message ***

git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@995 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
---
 util/udnnews.pl | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

(limited to 'util')

diff --git a/util/udnnews.pl b/util/udnnews.pl
index 07c49d4b..ba0fc072 100644
--- a/util/udnnews.pl
+++ b/util/udnnews.pl
@@ -39,8 +39,8 @@ sub getudnnewscontent($)
     my($url) = @_;
     my($buf, $content, $ret);
     $buf = `$LYNX -source '$url'`;
-    ($content) = $buf =~ m|<p><font class="text12" color=#CC0033><br>(.*?)<tr valign="top">|s;
-    ($content) = $buf =~ m|<p><font color="#CC0033" class="text12">(.*?)<tr valign="top">|s if( !$content );
+    ($content) = $buf =~ m|<!-- start of content -->(.*?)<!-- end of content -->|s;
+#    ($content) = $buf =~ m|<p><font color="#CC0033" class="text12">(.*?)<tr valign="top">|s if( !$content );
     $content =~ s/<br>/\n/g;
     $content =~ s/<p>/\n/gi;
     $content =~ s/<.*?>//g;
@@ -105,10 +105,11 @@ sub postout
 {
     my($param) = @_;
     return if( !$param->{title} );
-    open FH, ">/tmp/postout.$$";
-    print FH $param->{content};
-    close FH;
+#   open FH, ">/tmp/postout.$$";
+#    print FH $param->{content};
+print "$param->{content}";
+#    close FH;
 
-    system("bin/post '$param->{brdname}' '$param->{title}' '$param->{owner}' /tmp/postout.$$");
-    unlink "/tmp/postout.$$";
+#    system("bin/post '$param->{brdname}' '$param->{title}' '$param->{owner}' /tmp/postout.$$");
+#    unlink "/tmp/postout.$$";
 }
-- 
cgit v1.2.3