translate blue ballpoint

modules/fontane/transform.xqm

@@ -1433,6 +1433,7 @@ as item()* {
                                 case 'thin_pen' return 'feine Feder'
                                 case 'thick_pen' return 'breite Feder'
                                 case 'medium_pen' return 'mittlere Feder (Standard)'
+                                case 'blue_ballpoint' return 'blauer Kugelschreiber'
                                 default return $m
         let $medium := string-join($medium, ', ')
         let $style := $n/preceding::tei:handShift[@script][tokenize(@script, ' ') = ('standard', 'clean', 'hasty', 'angular')][1]/tokenize(@script, ' ')[. =('standard', 'clean', 'hasty', 'angular')]