Nicht angemeldeter Benutzer - Bearbeiten von Seiten ist nur als angemeldeter Benutzer möglich.

Änderungen

Zur Navigation springen Zur Suche springen
2017-05-02
Zeile 1: Zeile 1: −
local Serial = "2017-04-21"
+
local Serial = "2017-05-02"
 
--[=[
 
--[=[
 
Unterstützung für {{Literatur}}
 
Unterstützung für {{Literatur}}
Zeile 35: Zeile 35:  
     end
 
     end
 
end -- falsch()
 
end -- falsch()
  −
  −
  −
local function fault( a )
  −
    -- Formatiere Fehler mit class=error einstellungsabhängig
  −
    -- Parameter:
  −
    --    a  -- string mit Text
  −
    local r
  −
    if type( Zitation ) == "table" then
  −
        r = Zitation.fault( a )
  −
    else
  −
        r = falsch( a )
  −
    end
  −
    return r
  −
end -- fault()
        Zeile 168: Zeile 153:  
     -- Parameter:
 
     -- Parameter:
 
     --    adapt  -- something
 
     --    adapt  -- something
     -- returns atom value, or deep copy of a table with no metatable
+
     -- Returns atomic value, or deep copy of a table with no metatable
 
     local r
 
     local r
 
     if type( adapt ) == "table" then
 
     if type( adapt ) == "table" then
Zeile 247: Zeile 232:  
                         r = false
 
                         r = false
 
                     elseif s ~= args.Tag  and
 
                     elseif s ~= args.Tag  and
                           "0" .. s ~= args.Tag then
+
                           "0" .. s ~= args.Tag  and
 +
                          s .. "." ~= args.Tag then
 
                         fehler( "MonatTag",  "'Tag'=" .. args.Tag )
 
                         fehler( "MonatTag",  "'Tag'=" .. args.Tag )
 
                     end
 
                     end
Zeile 292: Zeile 278:  
local Band = function ( args )
 
local Band = function ( args )
 
     --    OBSOLET  nach Bereinigung im ANR
 
     --    OBSOLET  nach Bereinigung im ANR
     if args.Reihe and
+
     if args.Band and
       not args.BandReihe and
+
       not args.Sammelwerk and not args.BandReihe then
      not args.Sammelwerk then
+
         if args.Reihe then
         args.BandReihe = args.Band
+
            args.BandReihe = args.Band
        args.Band      = nil
+
            args.Band      = nil
         fehler( "Temp4" )
+
            fehler( "Temp4" )
 +
         else
 +
            fehler( "Temp3" )
 +
        end
 
     end
 
     end
 
end -- Band()
 
end -- Band()
Zeile 305: Zeile 294:  
local Nummer = function ( args )
 
local Nummer = function ( args )
 
     --    OBSOLET  nach Bereinigung im ANR
 
     --    OBSOLET  nach Bereinigung im ANR
     if args.Reihe and
+
     if args.Nummer and
       not args.NummerReihe and
+
       not args.Sammelwerk and not args.NummerReihe then
      not args.Sammelwerk then
+
         if args.Reihe then
         args.NummerReihe = args.Nummer
+
            args.NummerReihe = args.Nummer
        args.Nummer      = nil
+
            args.Nummer      = nil
         fehler( "Temp4" )
+
            fehler( "Temp4" )
 +
         else
 +
            fehler( "Temp3" )
 +
        end
 
     end
 
     end
 
end -- Nummer()
 
end -- Nummer()
Zeile 318: Zeile 310:  
local Herausgeber = function ( args )
 
local Herausgeber = function ( args )
 
     --    OBSOLET  nach Bereinigung im ANR
 
     --    OBSOLET  nach Bereinigung im ANR
     if args.Hrsg and not args.Sammelwerk and not args.HrsgReihe then
+
     if args.Hrsg and
 +
      not args.Sammelwerk and not args.HrsgReihe then
 
         if args.Reihe then
 
         if args.Reihe then
 
             args.HrsgReihe = args.Hrsg
 
             args.HrsgReihe = args.Hrsg
Zeile 365: Zeile 358:  
     r, schrott = Zitation.format()
 
     r, schrott = Zitation.format()
 
     if schrott then
 
     if schrott then
         Schrei = Schrei or ""
+
         if Schrei then
         Schrei = Schrei .. Zitation.fault( schrott )
+
            Schrei = string.format( "%s *** %s", Schrei, schrott )
 +
         else
 +
            Schrei = schrott
 +
        end
 
     end
 
     end
 
     return r
 
     return r
Zeile 385: Zeile 381:  
         Zitation.frame = frame
 
         Zitation.frame = frame
 
         folder()
 
         folder()
         r = format( arglist )
+
         r = string.format( "%s%s%s",
 +
                          format( arglist ),
 +
                          fehlerliste(),
 +
                          Zitation.failure( Schrei ) )
 
     else
 
     else
 
         fehler( "Modul", r )
 
         fehler( "Modul", r )
 +
        r = fehlerliste()
 
     end
 
     end
     return r .. fehlerliste() .. Zitation.failure( Schrei )
+
     return r
 
end -- f()
 
end -- f()
  
Cookies helfen uns bei der Bereitstellung von imedwiki. Durch die Nutzung von imedwiki erklärst du dich damit einverstanden, dass wir Cookies speichern.

Navigationsmenü