Dusting off some old patches.

Mon Nov 19 04:13:26 GMT 2007  Eric Kow <[EMAIL PROTECTED]>
  * Simplify getCurrentDirectorySansDarcs out of existence.
  
  It was buggy and needlessly complicated.

Mon Nov 19 17:44:22 GMT 2007  Eric Kow <[EMAIL PROTECTED]>
  * Fix corner case in sansDarcs.
  Pointed out by Kevin Quick.

Fri Jan 18 07:37:20 GMT 2008  Eric Kow <[EMAIL PROTECTED]>
  * Fix conflicts.
  - my sansDarcs
  - Kevin Quick's tempdir_loc simplifications

New patches:

[Simplify getCurrentDirectorySansDarcs out of existence.
Eric Kow <[EMAIL PROTECTED]>**20071119041326
 
 It was buggy and needlessly complicated.
] {
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 36
-import Data.List ( isInfixOf, inits )
+import Data.List ( inits )
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 36
-import Data.List ( isPrefixOf, inits )
-import System ( exitWith, ExitCode(..), getEnv )
+import Data.List ( isInfixOf, inits )
+import Data.Maybe ( listToMaybe )
+import System ( exitWith, ExitCode(..) )
hunk ./src/Darcs/Lock.lhs 36
-import Data.List ( isPrefixOf, inits )
)
)
hunk ./src/Darcs/Lock.lhs 65
                 atomic_create, sloppy_atomic_create )
 import System.Posix.Files ( getSymbolicLinkStatus, isDirectory )
 import System.Posix ( sleep )
-#include "impossible.h"
 
 withLock :: String -> IO a -> IO a
 releaseLock :: String -> IO ()
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 170
-tempdir_loc = do td <- ((head . words) `liftM` readBinFile "_darcs/prefs/tmpdir")
-                       `catchall` resort_to_environment
-                 try_directory td resort_to_environment
-    where resort_to_environment = look_for_tmp ["DARCS_TMPDIR", "TMPDIR"]
-          look_for_tmp (p:ps) = do t <- getEnv p
-                                   try_directory t $ look_for_tmp ps
-                                `catchall` look_for_tmp ps
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
-          try_directory d backup_plan = do exist <- doesDirectoryExist d
-                                           if exist then return $ d++"/"
-                                                    else backup_plan
-
-getCurrentDirectorySansDarcs :: IO FilePath
+tempdir_loc = firstJustIO [ readBinFile "_darcs/prefs/tmpdir" >>= return . Just . head.words >>= chkdir,
+                            maybeGetEnv "DARCS_TMPDIR" >>= chkdir,
+                            maybeGetEnv "TMPDIR" >>= chkdir,
+                            chkdir (Just "/tmp"),
+                            getCurrentDirectorySansDarcs,
+                            return $ Just "."  -- always returns a Just
+                          ]
+              >>= return . fromJust
+    where chkdir Nothing = return Nothing
+          chkdir (Just d) = doesDirectoryExist d >>= return . \e -> if e then Just (d++"/") else Nothing
+                                                         
+getCurrentDirectorySansDarcs :: IO (Maybe FilePath)
hunk ./src/Darcs/Lock.lhs 177
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
+          look_for_tmp [] = try_directory "/tmp" (sansDarcs `fmap` getCurrentDirectory)
)
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 186
-  where no_darcs x = not $ "_darcs" `isInfixOf` x
+  where no_darcs x = not $ "_darcs" `elem` breakup x
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 185
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+  return $ listToMaybe $ drop 5 $ reverse $ takeWhile no_darcs $ inits c
+  where no_darcs x = not $ "_darcs" `isInfixOf` x
merger 0.0 (
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 177
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
+          look_for_tmp [] = try_directory "/tmp" (sansDarcs `fmap` getCurrentDirectory)
hunk ./src/Darcs/Lock.lhs 170
-tempdir_loc = do td <- ((head . words) `liftM` readBinFile "_darcs/prefs/tmpdir")
-                       `catchall` resort_to_environment
-                 try_directory td resort_to_environment
-    where resort_to_environment = look_for_tmp ["DARCS_TMPDIR", "TMPDIR"]
-          look_for_tmp (p:ps) = do t <- getEnv p
-                                   try_directory t $ look_for_tmp ps
-                                `catchall` look_for_tmp ps
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
-          try_directory d backup_plan = do exist <- doesDirectoryExist d
-                                           if exist then return $ d++"/"
-                                                    else backup_plan
-
-getCurrentDirectorySansDarcs :: IO FilePath
+tempdir_loc = firstJustIO [ readBinFile "_darcs/prefs/tmpdir" >>= return . Just . head.words >>= chkdir,
+                            maybeGetEnv "DARCS_TMPDIR" >>= chkdir,
+                            maybeGetEnv "TMPDIR" >>= chkdir,
+                            chkdir (Just "/tmp"),
+                            getCurrentDirectorySansDarcs,
+                            return $ Just "."  -- always returns a Just
+                          ]
+              >>= return . fromJust
+    where chkdir Nothing = return Nothing
+          chkdir (Just d) = doesDirectoryExist d >>= return . \e -> if e then Just (d++"/") else Nothing
+                                                         
+getCurrentDirectorySansDarcs :: IO (Maybe FilePath)
)
hunk ./src/Darcs/Lock.lhs 182
-getCurrentDirectorySansDarcs :: IO FilePath
-getCurrentDirectorySansDarcs = do
-  c <- getCurrentDirectory
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+sansDarcs :: FilePath -> FilePath
+sansDarcs "" = ""
+sansDarcs ('/':'_':'d':'a':'r':'c':'s':_) = ""
+sansDarcs (x:xs) = x : sansDarcs xs
)
)
)
}
[Fix corner case in sansDarcs.
Eric Kow <[EMAIL PROTECTED]>**20071119174422
 Pointed out by Kevin Quick.
] {
merger 0.0 (
merger 0.0 (
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 185
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+  return $ listToMaybe $ drop 5 $ reverse $ takeWhile no_darcs $ inits c
+  where no_darcs x = not $ "_darcs" `isInfixOf` x
merger 0.0 (
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 177
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
+          look_for_tmp [] = try_directory "/tmp" (sansDarcs `fmap` getCurrentDirectory)
hunk ./src/Darcs/Lock.lhs 170
-tempdir_loc = do td <- ((head . words) `liftM` readBinFile "_darcs/prefs/tmpdir")
-                       `catchall` resort_to_environment
-                 try_directory td resort_to_environment
-    where resort_to_environment = look_for_tmp ["DARCS_TMPDIR", "TMPDIR"]
-          look_for_tmp (p:ps) = do t <- getEnv p
-                                   try_directory t $ look_for_tmp ps
-                                `catchall` look_for_tmp ps
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
-          try_directory d backup_plan = do exist <- doesDirectoryExist d
-                                           if exist then return $ d++"/"
-                                                    else backup_plan
-
-getCurrentDirectorySansDarcs :: IO FilePath
+tempdir_loc = firstJustIO [ readBinFile "_darcs/prefs/tmpdir" >>= return . Just . head.words >>= chkdir,
+                            maybeGetEnv "DARCS_TMPDIR" >>= chkdir,
+                            maybeGetEnv "TMPDIR" >>= chkdir,
+                            chkdir (Just "/tmp"),
+                            getCurrentDirectorySansDarcs,
+                            return $ Just "."  -- always returns a Just
+                          ]
+              >>= return . fromJust
+    where chkdir Nothing = return Nothing
+          chkdir (Just d) = doesDirectoryExist d >>= return . \e -> if e then Just (d++"/") else Nothing
+                                                         
+getCurrentDirectorySansDarcs :: IO (Maybe FilePath)
)
hunk ./src/Darcs/Lock.lhs 182
-getCurrentDirectorySansDarcs :: IO FilePath
-getCurrentDirectorySansDarcs = do
-  c <- getCurrentDirectory
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+sansDarcs :: FilePath -> FilePath
+sansDarcs "" = ""
+sansDarcs ('/':'_':'d':'a':'r':'c':'s':_) = ""
+sansDarcs (x:xs) = x : sansDarcs xs
)
)
hunk ./src/Darcs/Lock.lhs 186
-  where no_darcs x = not $ "_darcs" `isInfixOf` x
+  where no_darcs x = not $ "_darcs" `elem` breakup x
)
merger 0.0 (
merger 0.0 (
merger 0.0 (
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 177
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
+          look_for_tmp [] = try_directory "/tmp" (sansDarcs `fmap` getCurrentDirectory)
hunk ./src/Darcs/Lock.lhs 170
-tempdir_loc = do td <- ((head . words) `liftM` readBinFile "_darcs/prefs/tmpdir")
-                       `catchall` resort_to_environment
-                 try_directory td resort_to_environment
-    where resort_to_environment = look_for_tmp ["DARCS_TMPDIR", "TMPDIR"]
-          look_for_tmp (p:ps) = do t <- getEnv p
-                                   try_directory t $ look_for_tmp ps
-                                `catchall` look_for_tmp ps
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
-          try_directory d backup_plan = do exist <- doesDirectoryExist d
-                                           if exist then return $ d++"/"
-                                                    else backup_plan
-
-getCurrentDirectorySansDarcs :: IO FilePath
+tempdir_loc = firstJustIO [ readBinFile "_darcs/prefs/tmpdir" >>= return . Just . head.words >>= chkdir,
+                            maybeGetEnv "DARCS_TMPDIR" >>= chkdir,
+                            maybeGetEnv "TMPDIR" >>= chkdir,
+                            chkdir (Just "/tmp"),
+                            getCurrentDirectorySansDarcs,
+                            return $ Just "."  -- always returns a Just
+                          ]
+              >>= return . fromJust
+    where chkdir Nothing = return Nothing
+          chkdir (Just d) = doesDirectoryExist d >>= return . \e -> if e then Just (d++"/") else Nothing
+                                                         
+getCurrentDirectorySansDarcs :: IO (Maybe FilePath)
)
hunk ./src/Darcs/Lock.lhs 182
-getCurrentDirectorySansDarcs :: IO FilePath
-getCurrentDirectorySansDarcs = do
-  c <- getCurrentDirectory
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+sansDarcs :: FilePath -> FilePath
+sansDarcs "" = ""
+sansDarcs ('/':'_':'d':'a':'r':'c':'s':_) = ""
+sansDarcs (x:xs) = x : sansDarcs xs
)
hunk ./src/Darcs/Lock.lhs 185
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+  return $ listToMaybe $ drop 5 $ reverse $ takeWhile no_darcs $ inits c
+  where no_darcs x = not $ "_darcs" `isInfixOf` x
)
merger 0.0 (
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 182
-getCurrentDirectorySansDarcs :: IO FilePath
-getCurrentDirectorySansDarcs = do
-  c <- getCurrentDirectory
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+sansDarcs :: FilePath -> FilePath
+sansDarcs "" = ""
+sansDarcs ('/':'_':'d':'a':'r':'c':'s':_) = ""
+sansDarcs (x:xs) = x : sansDarcs xs
merger 0.0 (
hunk ./src/Darcs/Lock.lhs 177
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
+          look_for_tmp [] = try_directory "/tmp" (sansDarcs `fmap` getCurrentDirectory)
hunk ./src/Darcs/Lock.lhs 170
-tempdir_loc = do td <- ((head . words) `liftM` readBinFile "_darcs/prefs/tmpdir")
-                       `catchall` resort_to_environment
-                 try_directory td resort_to_environment
-    where resort_to_environment = look_for_tmp ["DARCS_TMPDIR", "TMPDIR"]
-          look_for_tmp (p:ps) = do t <- getEnv p
-                                   try_directory t $ look_for_tmp ps
-                                `catchall` look_for_tmp ps
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
-          try_directory d backup_plan = do exist <- doesDirectoryExist d
-                                           if exist then return $ d++"/"
-                                                    else backup_plan
-
-getCurrentDirectorySansDarcs :: IO FilePath
+tempdir_loc = firstJustIO [ readBinFile "_darcs/prefs/tmpdir" >>= return . Just . head.words >>= chkdir,
+                            maybeGetEnv "DARCS_TMPDIR" >>= chkdir,
+                            maybeGetEnv "TMPDIR" >>= chkdir,
+                            chkdir (Just "/tmp"),
+                            getCurrentDirectorySansDarcs,
+                            return $ Just "."  -- always returns a Just
+                          ]
+              >>= return . fromJust
+    where chkdir Nothing = return Nothing
+          chkdir (Just d) = doesDirectoryExist d >>= return . \e -> if e then Just (d++"/") else Nothing
+                                                         
+getCurrentDirectorySansDarcs :: IO (Maybe FilePath)
)
)
hunk ./src/Darcs/Lock.lhs 184
-sansDarcs ('/':'_':'d':'a':'r':'c':'s':_) = ""
+sansDarcs "/_darcs" = ""
+sansDarcs ('/':'_':'d':'a':'r':'c':'s':'/':_) = ""
)
)
)
}
[Fix conflicts.
Eric Kow <[EMAIL PROTECTED]>**20080118073720
 - my sansDarcs
 - Kevin Quick's tempdir_loc simplifications
] {
hunk ./src/Darcs/Lock.lhs 36
 
 import Prelude hiding ( catch )
 import Control.Monad ( liftM )
-import Data.List ( isPrefixOf, inits )
-import System ( exitWith, ExitCode(..), getEnv )
+import System ( exitWith, ExitCode(..) )
 import System.IO ( openBinaryFile, hClose, hPutStr, Handle,
                    IOMode(WriteMode, AppendMode), hFlush, stdout )
 import System.IO.Error ( isDoesNotExistError, isAlreadyExistsError )
hunk ./src/Darcs/Lock.lhs 58
                         )
 import Darcs.SignalHandler ( withSignalsBlocked )
 import Printer ( Doc, hPutDoc, packedString, empty, renderPSs )
-import FileName ( breakup )
 import Darcs.Global ( atexit )
 import Darcs.Compat ( mkstemp, mk_stdout_temp, canonFilename, maybeRelink,
                 atomic_create, sloppy_atomic_create )
hunk ./src/Darcs/Lock.lhs 63
 import System.Posix.Files ( getSymbolicLinkStatus, isDirectory )
 import System.Posix ( sleep )
+#include "impossible.h"
 
 withLock :: String -> IO a -> IO a
 releaseLock :: String -> IO ()
hunk ./src/Darcs/Lock.lhs 169
 
 \begin{code}
 tempdir_loc :: IO FilePath
-tempdir_loc = do td <- ((head . words) `liftM` readBinFile "_darcs/prefs/tmpdir")
-                       `catchall` resort_to_environment
-                 try_directory td resort_to_environment
-    where resort_to_environment = look_for_tmp ["DARCS_TMPDIR", "TMPDIR"]
-          look_for_tmp (p:ps) = do t <- getEnv p
-                                   try_directory t $ look_for_tmp ps
-                                `catchall` look_for_tmp ps
-          look_for_tmp [] = try_directory "/tmp" getCurrentDirectorySansDarcs
-          try_directory d backup_plan = do exist <- doesDirectoryExist d
-                                           if exist then return $ d++"/"
-                                                    else backup_plan
+tempdir_loc = firstJustIO [ readBinFile "_darcs/prefs/tmpdir" >>= return . Just . head.words >>= chkdir,
+                            maybeGetEnv "DARCS_TMPDIR" >>= chkdir,
+                            maybeGetEnv "TMPDIR" >>= chkdir,
+                            chkdir (Just "/tmp"),
+                            fmap (Just . sansDarcs) getCurrentDirectory >>= chkdir,
+                            return $ Just "."  -- always returns a Just
+                          ]
+              >>= return . fromJust
+    where chkdir Nothing = return Nothing
+          chkdir (Just d) = doesDirectoryExist d >>= return . \e -> if e then Just (d++"/") else Nothing
 
hunk ./src/Darcs/Lock.lhs 180
-getCurrentDirectorySansDarcs :: IO FilePath
-getCurrentDirectorySansDarcs = do
-  c <- getCurrentDirectory
-  case drop 5 $ reverse $ takeWhile no_darcs $ inits c of
-    []    -> impossible
-    (d:_) -> return d
-  where no_darcs x = not $ "_darcs" `isPrefixOf` x
+sansDarcs :: FilePath -> FilePath
+sansDarcs "" = ""
+sansDarcs "/_darcs" = ""
+sansDarcs ('/':'_':'d':'a':'r':'c':'s':'/':_) = ""
+sansDarcs (x:xs) = x : sansDarcs xs
 
 data WithDirKind = Perm | Temp | Delayed
 
}

Context:

[fix bug in darcs repair (issue586).
David Roundy <[EMAIL PROTECTED]>**20080114204243] 
[A test for unrecording checkpoint tags, inspired by issue517
Mark Stosberg <[EMAIL PROTECTED]>**20080113025555] 
[resolve conflict.
David Roundy <[EMAIL PROTECTED]>**20080111160045] 
[Conflict backup files are boring.
Trent W. Buck <[EMAIL PROTECTED]>**20080110163822] 
[more boring extensions
[EMAIL PROTECTED]
 Added extensions for CLISP, CMUCL, and "part" files which result in
 failed KDE copy operations.
] 
[resolve conflict in Libwww.
David Roundy <[EMAIL PROTECTED]>**20080110234609] 
[Some error reporting for libwww.
Dmitry Kurochkin <[EMAIL PROTECTED]>**20080110221921] 
[add optional support for using the pure haskell Network.HTTP http implementation
John Meacham <[EMAIL PROTECTED]>**20080110215859] 
[make darcs-2 repositories store patches in more-nicely-formated format
David Roundy <[EMAIL PROTECTED]>**20080110220413] 
[fix filename encoding issue in ShowFiles.
David Roundy <[EMAIL PROTECTED]>**20080110204120] 
[add debug message when grabbing files using libcurl.
David Roundy <[EMAIL PROTECTED]>**20080110202200] 
[make using libwww no longer the default, even if it's present.
David Roundy <[EMAIL PROTECTED]>**20080110195753
 There is a bug in our libwww bindings that I haven't located... if it isn't
 fixed, we should definitely remove this binding before the darcs 2.0
 release.
] 
[make Libwww.copyUrls provide debug output.
David Roundy <[EMAIL PROTECTED]>**20080110195733] 
[test: Exibit a falling test about rollback.
[EMAIL PROTECTED]
 Indeed  the only test about rollback was br0ken by a prior test that creates a
 directory  and  remove  read  permissions  to  it.  The  rollback test do some
 records  that  silently  fail  by lack of permissions, finally the rollback is
 cancelled since the named patch doesn't exist.
 This shows that rollback need some care.
] 
[Canonize Gwern Branwen, Nicolas Pouillard, Eric Kow.
Eric Kow <[EMAIL PROTECTED]>**20080109152727] 
[Eliminate configure test for Text.PrettyPrint.
Eric Kow <[EMAIL PROTECTED]>**20080109152927] 
[Use our own Printer instead of Text.PrettyPrint (make_changelog).
Eric Kow <[EMAIL PROTECTED]>**20080109172910] 
[Add parens functionality to the printer code.
Eric Kow <[EMAIL PROTECTED]>**20080109144956] 
[issue567: regression test for moving a file to the same location as itself
Mark Stosberg <[EMAIL PROTECTED]>**20080109032346] 
[restore behavior where we display conflicts in --summary mode.
David Roundy <[EMAIL PROTECTED]>**20080110004605] 
[regression test for issue406
Mark Stosberg <[EMAIL PROTECTED]>**20080109044500] 
[fix latex bug in docs.
David Roundy <[EMAIL PROTECTED]>**20080108211102] 
[fix latex bug in docs.
David Roundy <[EMAIL PROTECTED]>**20080108205912] 
[fix bug in show_tags.sh cleanup.
David Roundy <[EMAIL PROTECTED]>**20080108204430] 
[doc,typo: some s/darcs commit/darcs record/
[EMAIL PROTECTED] 
[test: Add a test for darcs show tags.
[EMAIL PROTECTED] 
[document the three repo format flags for "darcs init"
Mark Stosberg <[EMAIL PROTECTED]>**20080108041024] 
[improve the one-paragraph docs for "darcs init"
Mark Stosberg <[EMAIL PROTECTED]>**20080108040941] 
[Quit defining inventory format options recursively. Provide user-oriented descriptions.
Mark Stosberg <[EMAIL PROTECTED]>**20080108035256] 
[update partial.sh to show off improved darcs-2/partial functionality
Mark Stosberg <[EMAIL PROTECTED]>**20080108024712] 
[typo and bug fix in partial.sh.
Mark Stosberg <[EMAIL PROTECTED]>**20080108022808
 
 It turned out the call to "darcs optimize" was silently failing to create a checkpoint
 because there was no tag. This caused the remaining tests for --partial to run against 
 a full repo, not a partial one. 
] 
[issue55: document that darcs handles some types of binary files automatically. 
Mark Stosberg <[EMAIL PROTECTED]>**20080108010043] 
[correct apparent typo in test.
Mark Stosberg <[EMAIL PROTECTED]>**20080108005710
     The fix made more sense than the former behavior of comparing a file to itself. 
] 
[issue395: eliminate patches with a single character name from shell scripts in the test suite.
Mark Stosberg <[EMAIL PROTECTED]>**20080106051821] 
[prevent warning in test script and remove mysterious exit(1) call.
Mark Stosberg <[EMAIL PROTECTED]>**20080106052622] 
[issue526: improve Perl test suite.
Mark Stosberg <[EMAIL PROTECTED]>**20080106045548
     - better compatibility when path to darcs includes a space
     - better portability by eliminating some system calls
     - general style improvements
] 
[minor white-space and code style improvements
Mark Stosberg <[EMAIL PROTECTED]>**20080105183641] 
[typo fix on GNUmakefile comment
Mark Stosberg <[EMAIL PROTECTED]>**20080105183027] 
[refactor: improve style and portability of pull.pl test script.
Mark Stosberg <[EMAIL PROTECTED]>**20080105181751
     Many direct system calls were eliminated. No functional changes.  
] 
[issue347 - document that single quotes should be used in .darcs/defaults
Mark Stosberg <[EMAIL PROTECTED]>**20080101164428] 
[add feature requested in issue576.
David Roundy <[EMAIL PROTECTED]>**20080105150125] 
[fix bug in issue576.
David Roundy <[EMAIL PROTECTED]>**20080105144929] 
[add test that triggers bug in issue576.
David Roundy <[EMAIL PROTECTED]>**20080105144812] 
[Make sure we test the 'darcs' we just built and not one in a global path.
Mark Stosberg <[EMAIL PROTECTED]>**20080102002235
     This done by using "$DARCS" instead of 'darcs'.
     However, in my case the updated test FAILS unexplainably with 2.0.0pre3,
     by failing to detect that a file has changed. 
     If I follow along in a shell and run the same commands with Darcs 2, 
     the problem does not appear. 
] 
[add configure support for libwww.
David Roundy <[EMAIL PROTECTED]>**20080104201255] 
[make bug message more explicit.
David Roundy <[EMAIL PROTECTED]>**20080104004253] 
[Initial implementation of HTTP pipelining using libwww.
Dmitry Kurochkin <[EMAIL PROTECTED]>**20071222144902] 
[make indent slightly more concise using lines and unlines.
David Roundy <[EMAIL PROTECTED]>**20080104003953] 
[refactor: replace recursive indent with more concise find-and-replace syntax
Mark Stosberg <[EMAIL PROTECTED]>**20080101200447] 
[simplify (and debug) pending handling.
David Roundy <[EMAIL PROTECTED]>**20071227133618
 Note that this change could lead to performance regressions, but I believe
 that these regressions would be strongly bounded (never worse than a
 whatsnew), and this simplification makes the code much easier to safely
 modify.
] 
[make updating of pending on pull much more efficient.
David Roundy <[EMAIL PROTECTED]>**20071224131059] 
[simplify a bit of code.
David Roundy <[EMAIL PROTECTED]>**20071224131023] 
[fix type-witness bug in HopefullyPrivate.
David Roundy <[EMAIL PROTECTED]>**20071223141149] 
[simplify Get
David Roundy <[EMAIL PROTECTED]>**20071223025108] 
[simplify tentativelyAddPatch by removing unused return value.
David Roundy <[EMAIL PROTECTED]>**20071223024400] 
[simplify away np2prims and nps2prims.
David Roundy <[EMAIL PROTECTED]>**20071223022145] 
[try to avoid rewriting patches that we've just read.
David Roundy <[EMAIL PROTECTED]>**20071222190029] 
[generalize CommandsAux utility functions.
David Roundy <[EMAIL PROTECTED]>**20071222162952] 
[add new instances for PatchInfoAnd.
David Roundy <[EMAIL PROTECTED]>**20071222144439] 
[change tentativelyAddPatch to accept a PatchInfoAnd p.
David Roundy <[EMAIL PROTECTED]>**20071222140517] 
[internal prepration for optimization saving patch writing.
David Roundy <[EMAIL PROTECTED]>**20071222134834] 
[add changelog entry.
David Roundy <[EMAIL PROTECTED]>**20071219162646] 
[add fixme indicating where the code could be simplified.
David Roundy <[EMAIL PROTECTED]>**20071221135649] 
[make reading of hashed inventories lazier.
David Roundy <[EMAIL PROTECTED]>**20071221133453] 
[resolve conflicts in mv_and_remove_tests.sh.
David Roundy <[EMAIL PROTECTED]>**20071219144638] 
[Fix !(...|...) in mv_and_remove_tests.sh.
Dave Love <[EMAIL PROTECTED]>**20071218001826
 Assume the original construct should have been `! ... | ...' and
 replace with a portable version of that.
] 
[[issue571] Redo last HAVE_TERMIO_H fix.
Dave Love <[EMAIL PROTECTED]>**20071218140508
 Not the most direct fix, but simpler.
] 
[Fix configure test for gadt type witnesses.
Dave Love <[EMAIL PROTECTED]>**20071218120139] 
[use --ignore-times in all tests.
David Roundy <[EMAIL PROTECTED]>**20071217225159
 This is because the hashed repository is a bit pickier, in that
 it no longer checks file lengths when the file modification times
 match.
] 
[enable modification time checking on hashed repositories.
David Roundy <[EMAIL PROTECTED]>**20071217220237] 
[Pass two args to `cmp' in tests, following POSIX.
Dave Love <[EMAIL PROTECTED]>**20071216180503
 Fixes some failures on Solaris.
] 
[resolve silly conflict with myself.
David Roundy <[EMAIL PROTECTED]>**20071217200855] 
[clean up SelectChanges (eliminating Bools)
David Roundy <[EMAIL PROTECTED]>**20071217191809] 
[make a few more files compile with type witnesses.
David Roundy <[EMAIL PROTECTED]>**20071217183234] 
[fix bug in revert (in writing the unrevert file).
David Roundy <[EMAIL PROTECTED]>**20071216215225] 
[make a few more files compile with type witnesses.
David Roundy <[EMAIL PROTECTED]>**20071217164815] 
[remove tabs.
David Roundy <[EMAIL PROTECTED]>**20071216224617] 
[bump version number preemptively to 2.0.0pre3.
David Roundy <[EMAIL PROTECTED]>**20071216222823] 
[fix doc bug in show contents.
David Roundy <[EMAIL PROTECTED]>**20071216214002] 
[TAG 2.0.0pre2
David Roundy <[EMAIL PROTECTED]>**20071216201647] 
Patch bundle hash:
4b46bd3e3dcb4cc75104e08e1e98f24a61db86bd
_______________________________________________
darcs-devel mailing list
darcs-devel@darcs.net
http://lists.osuosl.org/mailman/listinfo/darcs-devel

Reply via email to