htmlhead

[nj-awaymsg.git] / mason / edit
diff --git a/mason/edit b/mason/edit

index 60e8b9e644615e6354c84401cc70450559c2dd29..e887bdb739a78f84caf2bf5cf60f28400c46795f 100755 (executable)
--- a/mason/edit
+++ b/mason/edit
@@ -39,10 +39,7 @@ if ($ARGS{'create'}) {
  if (!$tx) { die "no such text $textid"; }
  
  </%perl>
-<html lang="en"><head>
-<title>Editing - <% $tx->{'desc'} |h %> - Email away message setup</title>
-</head><body>
-<h1>Edit "<% $tx->{'desc'} |h %>"</h1>
+<& htmlhead, subpage => "Edit \"$tx->{'desc'}\"" &>
  <form action="save" method="post">
  <&| txtable, tx => $tx, inputs => 1 &>
  <tr><td colspan=2><textarea cols=79 rows=15><%