anchor.diff:               *default-pathname-defaults*
                #p"LOCAL:>Mezzano>"
                :filter 'file-filter)
  -
     ;; And everything else.
     (copy-many (merge-pathnames "*/**/*.*" (user-homedir-pathname))
                (user-homedir-pathname)
  
positive.code: 
  ;; Cutting a release:
  ;; Start from a clean checkout of mbuild
  ;; Set *lisp-implementation-version* appropriately (system/environment.lisp)
  ;; Optional: Point ASDF source registry at (pathname "SYS:HOME;") (ipl.lisp, HOME-SOURCE-REGISTRY) instead of (user-homedir-pathname). This gets the source paths right for ED.
  ;; Build as normal
  
negative.code:   (copy-sources)
    (mcclim-setup)
    (load-quicklisp)
    (cal "SYS:SOURCE;GUI;COLOUR-MATRIX-DEMO.LISP")
    (setf mezzano.gui.desktop::*icons*
          (append mezzano.gui.desktop::*icons*
                  '(("LOCAL:>Icons>Mandelbrot.png" "Postprocessing Demo" "(mezzano.gui.fancy-repl:spawn :initial-function 'colour-matrix-demo:demo :title \"Display Postprocessing Demo\" :width 450 :height 90)"))))
  