suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

More svn -> git changes.

Browse Source 
Some mentions of svn/subversion are replaced with git, and some patterns
for paths to ignore include ".git*".  (Note ".mailmap" not added, might
need to.)

original commit: 9c352f5704092f747dd765cb42c7d547ebbb8621
This commit is contained in:
Eli Barzilay 2010-05-17 04:38:43 -04:00
parent 3efca9178e
commit ade32a3e54
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
collects/framework/private/frame.rkt
View File

@ -2410,14 +2410,11 @@
(define memory-canvases '())
(define show-memory-text?
(or (with-handlers ([exn:fail:filesystem?
(λ (x) #f)])
(or (with-handlers ([exn:fail:filesystem? (λ (x) #f)])
(directory-exists? (collection-path "repo-time-stamp")))
(with-handlers ([exn:fail:filesystem?
(λ (x) #f)])
(with-handlers ([exn:fail:filesystem? (λ (x) #f)])
(let ([fw (collection-path "framework")])
(or (directory-exists? (build-path fw ".svn"))
(directory-exists? (build-path fw "CVS")))))))
(directory-exists? (build-path fw 'up 'up ".git"))))))
(define bday-click-canvas%
(class canvas%