6 files changed, 0 insertions, 128 deletions

diff --git a/deskutils/Makefile b/deskutils/Makefile
index 53e27da55f28..ee6c1e589677 100644
--- a/deskutils/Makefile
+++ b/deskutils/Makefile
@@ -23,7 +23,6 @@
     SUBDIR += cdcat
     SUBDIR += charmap
     SUBDIR += charmtimetracker
-    SUBDIR += checkrdf
     SUBDIR += clipit
     SUBDIR += conduit
     SUBDIR += conkyemail
diff --git a/deskutils/checkrdf/Makefile b/deskutils/checkrdf/Makefile
deleted file mode 100644
index dbeac7073357..000000000000
--- a/deskutils/checkrdf/Makefile
+++ /dev/null
@@ -1,35 +0,0 @@
-# Created by: Oliver Braun <obraun@FreeBSD.org>
-# $FreeBSD$
-
-PORTNAME=	checkrdf
-PORTVERSION=	39.4444
-PORTREVISION=	7
-CATEGORIES=	deskutils
-MASTER_SITES=	SF
-
-MAINTAINER=	haskell@FreeBSD.org
-COMMENT=	Tool for RDF site summaries based news-check
-
-LICENSE=	BSD
-
-BUILD_DEPENDS=	hs-HaXml>=1.19:${PORTSDIR}/textproc/hs-HaXml
-
-USE_BZIP2=	yes
-
-MAN1=		checkrdf.1
-MANCOMPRESSED=	yes
-
-PLIST_FILES=	bin/checkrdf bin/checkrdf.bin etc/checkrdf.rc
-PORTDOCS=	README NEWS blog.news.css bluegreek.css myrdf.css
-
-OPTIONS_DEFINE=		DOCS
-OPTIONS_DEFAULT=	DOCS
-
-NO_STAGE=	yes
-.include <bsd.port.options.mk>
-
-.if empty(PORT_OPTIONS:MDOCS)
-INSTALL_TARGET=install-bin install-rc install-man
-.endif
-
-.include <bsd.port.mk>
diff --git a/deskutils/checkrdf/distinfo b/deskutils/checkrdf/distinfo
deleted file mode 100644
index 3e238f66adb8..000000000000
--- a/deskutils/checkrdf/distinfo
+++ /dev/null
@@ -1,2 +0,0 @@
-SHA256 (checkrdf-39.4444.tar.bz2) = 1308e7830b2f4927e368e7f43b058fcc4ae9c0f35063ab209ae7aa8c7a9bd982
-SIZE (checkrdf-39.4444.tar.bz2) = 12263
diff --git a/deskutils/checkrdf/files/patch-CheckRDF.hs b/deskutils/checkrdf/files/patch-CheckRDF.hs
deleted file mode 100644
index 1289a7b98793..000000000000
--- a/deskutils/checkrdf/files/patch-CheckRDF.hs
+++ /dev/null
@@ -1,73 +0,0 @@
---- ./CheckRDF.hs.orig	2007-03-02 19:13:07.000000000 +0100
-+++ ./CheckRDF.hs	2013-05-01 00:09:20.000000000 +0200
-@@ -18,15 +18,21 @@
- 
- import RDFConfig
- 
--import System (getArgs, exitWith, ExitCode(..),system,getEnv)
--import IO ( catch, openFile, IOMode(..), hIsEOF, hGetLine
-+import System.Environment (getArgs, getEnv)
-+import System.Process (system)
-+import System.Exit (exitWith, ExitCode(..))
-+import System.IO ( openFile, IOMode(..), hIsEOF, hGetLine
-           , hPutStr, hClose, hFlush, stdin, Handle, hPutStrLn, hGetContents)
--import Directory ( doesFileExist, getPermissions, readable, removeFile )
--import List ( partition, intersperse, groupBy, sortBy)
--import Time (getClockTime,toCalendarTime,calendarTimeToString)
-+import System.IO.Error ( catchIOError )
-+import System.Directory ( doesFileExist, getPermissions, readable, removeFile )
-+import Data.List ( partition, intersperse, groupBy, sortBy)
-+import System.Time (getClockTime,toCalendarTime,calendarTimeToString)
-+import Data.Char (toLower)
- 
- import Text.XML.HaXml.Types
- import Text.XML.HaXml.Parse         (xmlParse)
-+import Text.XML.HaXml.Posn          (noPos)
-+import Text.XML.HaXml.Xtract.Lex    (lexXtract)
- import Text.XML.HaXml.Xtract.Parse  (parseXtract)
- import Text.PrettyPrint.HughesPJ    (render, vcat)
- import Text.XML.HaXml.Pretty        (content)
-@@ -52,15 +58,15 @@
- mkNewRDF :: RDFConfig -> FilePath -> String -> RDF
- mkNewRDF config filename contents =
-      let elem = getElem $ xmlParse filename contents
--         ct = render $ vcat $ map content $ dfilter (parseXtract "channel/title/-") elem
--         cl = render $ vcat $ map content $ dfilter (parseXtract "channel/link/-")  elem
--         len1 = length $ dfilter (parseXtract "//item/title") elem
--         len2 = length $ dfilter (parseXtract "//item/link") elem
-+         ct = render $ vcat $ map content $ dfilter (parseXtract (lexXtract (map toLower) "channel/title/-")) elem
-+         cl = render $ vcat $ map content $ dfilter (parseXtract (lexXtract (map toLower) "channel/link/-"))  elem
-+         len1 = length $ dfilter (parseXtract (lexXtract (map toLower) "//item/title")) elem
-+         len2 = length $ dfilter (parseXtract (lexXtract (map toLower) "//item/link")) elem
-          items = if len1 == len2
-            then (map (\ i -> (render $ vcat $ map content $
--                                dfilter (parseXtract ("//item/title["++i++"]/-")) elem
-+                                dfilter (parseXtract (lexXtract (map toLower) ("//item/title["++i++"]/-"))) elem
-                              ,render $ vcat $ map content $
--                                dfilter (parseXtract ("//item/link["++i++"]/-" )) elem)
-+                                dfilter (parseXtract (lexXtract (map toLower) ("//item/link["++i++"]/-" ))) elem)
-                      )
-                      $ map show [0..len1-1])
-            else []
-@@ -69,7 +75,7 @@
-              ,clink  = cl
-              ,citems = rdfitems
-              }
-- where getElem (Document _ _ e _) = CElem e
-+ where getElem (Document _ _ e _) = CElem e noPos
-        dfilter f = \ x -> f x x
-        mkRDFItem (t,l) = RDFItem {title = substituteChar '\n' ' ' $ rmCDATA t
-                                  ,link  = filter (/='\n') $ rmCDATA l
-@@ -109,9 +115,9 @@
-     if iseof
-      then return []
-      else do line <- hGetLine h
--             mrdf <- catch (do rdf <- (readIO line :: IO RDF)
--                               return $ Just rdf)
--                           (const $ return Nothing)
-+             mrdf <- catchIOError (do rdf <- (readIO line :: IO RDF)
-+                                      return $ Just rdf)
-+                                  (const $ return Nothing)
-              maybe (return [])
-                    (\rdf -> do rdfs <- readRDFs h
-                                return $! rdf : rdfs)
diff --git a/deskutils/checkrdf/files/patch-Main.hs b/deskutils/checkrdf/files/patch-Main.hs
deleted file mode 100644
index f1206d55510a..000000000000
--- a/deskutils/checkrdf/files/patch-Main.hs
+++ /dev/null
@@ -1,12 +0,0 @@
---- ./Main.hs.orig	2005-05-29 21:27:39.000000000 +0200
-+++ ./Main.hs	2012-05-12 19:33:06.000000000 +0200
-@@ -19,7 +19,8 @@
- 
- import CheckRDF
- import RDFConfig
--import System (getArgs, exitWith, ExitCode(..),getEnv)
-+import System.Environment (getArgs, getEnv)
-+import System.Exit (exitWith, ExitCode(..))
- 
- main :: IO ()
- main = do files <- getArgs
diff --git a/deskutils/checkrdf/pkg-descr b/deskutils/checkrdf/pkg-descr
deleted file mode 100644
index f629e9f9a2bd..000000000000
--- a/deskutils/checkrdf/pkg-descr
+++ /dev/null
@@ -1,5 +0,0 @@
-CheckRDF is a tool, consisting of a shell script and a Haskell program, for
-downloading RDF site summaries and showing news in a text file and in an HTML
-file. It is highly configurable.
-
-WWW: http://checkrdf.sourceforge.net/