Formatierungsfunktion vereinfacht.

Funktion fuer Formatierung der Ausgabe durch sprintf() ersetzt.
(unbekannter Autor).

Change-Id: I9c977d38eb20fdf26098a08eae8c5cb75e0cb40f
diff --git a/d/seher/haeuser/moebel/lesepult.c b/d/seher/haeuser/moebel/lesepult.c
index 756dc05..b096c6a 100644
--- a/d/seher/haeuser/moebel/lesepult.c
+++ b/d/seher/haeuser/moebel/lesepult.c
@@ -435,47 +435,12 @@
  return 0;
 }
 
-string calc_name()
-{
-string *nam;
-string res;
-int i,j;
- res="";
- if (owner=="")
- return "";
- nam=explode(upperstring(owner),"");
- if (j=sizeof(nam))
- {
-  switch(j)
-  {
-   case 3..4:
-    res="          ";
-    break;
-   case 5:
-    res="        ";
-    break;
-   case 7:
-    res="      ";
-    break;
-   case 9:
-    res="    ";
-    break;
-   default:
-    res="   ";
-  }
-  for (i=0;i<j;i++)
-  {
-   res+=nam[i]+" ";
-  }
- }
- return res;
-}
-
-string rd_lettern(string key)
-{
- return "\n"+
- "    De Templum Os Hel\n\n"+
- calc_name()+"\n\n";
+string rd_lettern(string key) {
+  return sprintf("\n"
+                 "%26|s\n\n"
+                 "%26|s\n\n",
+                 "De Templum Os Hel",
+                 regreplace(upperstring(owner), "", " ", 1));
 }
 
 string rd_inhalt(string key)