[publican-list] [Bug 471703] RFE: new "make" target that does not use 98-100% CPU

[bugzilla at redhat.com]

Please do not reply directly to this email. All additional
comments should be made in the comments box of this bug.


https://bugzilla.redhat.com/show_bug.cgi?id=471703


Douglas Silas <dhensley at redhat.com> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |dhensley at redhat.com




--- Comment #4 from Douglas Silas <dhensley at redhat.com>  2009-03-01 20:49:34 EDT ---
Or, similarly...

prepForPublican = do
 wd ← liftIO $ getWorkingDirectory
 conts ← liftIO $ getDirectoryContents wd >>= return ◦ filter (∉ [".", ".."])
 env ← ask
 state ← get
 if lit_Makefile ∉ conts
  then do
   outLine $ msgNoBuildFile wd
   retCode 1 fnNm
  else do
   mf ← parseMakefile `liftM` (liftIO $ readFile lit_Makefile)
   put state
    { makefile = Just mf
    , docLocation = lookup "XML_LANG" mf
    , docName = (flip addExtension $ ".xml")
     `liftM` (lookup "DOCNAME" mf)}
   retCode 0 fnNm
 where
 fnNm = "prepForPublican"
 msgNoBuildFile wd = docitErr ⧺ fnNm ⧺ ": "
  ⧺ "a Makefile does not not exist in the current working directory: " ⧺ wd

-- 
Configure bugmail: https://bugzilla.redhat.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are on the CC list for the bug.