Printing movement titles in page header

[Mark Knoop]

I'm trying to include the title of the current movement in the page
header. This works if I use bookparts to seperate the movements, but
not by setting header:piece in a score block. I don't want to use
bookparts as I don't want pagebreaks between movements.

Any ideas on how to achieve this? 

\version "2.19.22"

\header {
  title = "My Piece"
  composer = "Me"
  tagline = ##f
  % piece only prints in header if set here or in bookpart header
  piece = "Global Piece"
}

\paper {
  oddHeaderMarkup = \markup
  \fill-line {
    \on-the-fly #not-part-first-page \fromproperty #'header:piece
    \on-the-fly #not-part-first-page \fromproperty #'header:title
    \on-the-fly #print-page-number-check-first 
      \fromproperty #'page:page-number-string 
  }
  evenHeaderMarkup = \oddHeaderMarkup
}

\book {
  \bookpart {
    % piece only prints in header if set here or in top-level header
    \header { piece = "Part 1" }
    \score {
      % setting piece here has no effect
      \header { piece = "Movement 1" }
      \repeat unfold 400 c'1
    }
    \score {
      % setting piece here has no effect
      \header { piece = "Movement 2" }
      \repeat unfold 400 d'1
    }
  }
  \bookpart {
    \score {
      % setting piece here has no effect, 
      % even without a bookpart level header 
      \header { piece = "Movement 3" } 
      \repeat unfold 400 e'1
    }
  }
}

-- 
Mark Knoop