*** DTMLDocument.py.original	Thu Jan 13 00:51:34 2000
--- DTMLDocument.py	Thu Jan 13 00:51:34 2000
***************
*** 190,199 ****
  
  addForm=HTMLFile('documentAdd', globals())
  
! def addDTMLDocument(self, id, title='', file='', REQUEST=None, submit=None):
      """Add a DTML Document object with the contents of file. If
      'file' is empty, default document text is used.
      """
      if type(file) is not type(''): file=file.read()
      if not file: file=default_dd_html
      ob=DTMLDocument(file, __name__=id)
--- 190,205 ----
  
  addForm=HTMLFile('documentAdd', globals())
  
! def addDTMLDocument(self, id, title='', file='', REQUEST=None, submit=None,
!     StDTMLTemp=None): # hack by kslee. 
      """Add a DTML Document object with the contents of file. If
      'file' is empty, default document text is used.
+     If StDTMLTemp is given and valid, StDTMLTemp text is used. #hack by kslee.
      """
+     ### hack by kslee.
+     if StDTMLTemp: file=getattr(getattr(self, 'StDTMLRepo'), StDTMLTemp).read()
+     ### hack ends.
+ 
      if type(file) is not type(''): file=file.read()
      if not file: file=default_dd_html
      ob=DTMLDocument(file, __name__=id)
*** DTMLMethod.py.original	Thu Jan 13 00:51:34 2000
--- DTMLMethod.py	Thu Jan 13 00:51:34 2000
***************
*** 382,391 ****
  
  addForm=HTMLFile('methodAdd', globals())
  
! def addDTMLMethod(self, id, title='', file='', REQUEST=None, submit=None):
      """Add a DTML Method object with the contents of file. If
      'file' is empty, default document text is used.
      """
      if type(file) is not type(''): file=file.read()
      if not file: file=default_dm_html
      ob=DTMLMethod(file, __name__=id)
--- 382,396 ----
  
  addForm=HTMLFile('methodAdd', globals())
  
! def addDTMLMethod(self, id, title='', file='', REQUEST=None, submit=None,
!     StDTMLTemp=None): # hack by kslee.
      """Add a DTML Method object with the contents of file. If
      'file' is empty, default document text is used.
+     If StDTMLTemp is given and valid, StDTMLTemp text is used. #hack by kslee.
      """
+     ### hack by kslee.
+     if StDTMLTemp: file=getattr(getattr(self, 'StDTMLRepo'), StDTMLTemp).read()
+     ### hack ends.
      if type(file) is not type(''): file=file.read()
      if not file: file=default_dm_html
      ob=DTMLMethod(file, __name__=id)
*** documentAdd.dtml.original	Thu Jan 13 00:51:34 2000
--- documentAdd.dtml	Thu Jan 13 00:51:34 2000
***************
*** 20,25 ****
--- 20,29 ----
  You may create a new DTML Document using the form below. 
  You may also choose to upload an existing html file from your
  local computer by clicking the <I>Browse</I> button.
+ <!-- added by kslee -->
+ Or select from your site's DTML Document Templates, if the 
+ appropriate Selection Box appears below.
+ <!-- ends -->
  </P>
  
  <FORM ACTION="addDTMLDocument" METHOD="POST"
***************
*** 34,44 ****
    <TD ALIGN="LEFT" VALIGN="TOP"><INPUT TYPE="TEXT" NAME="title" SIZE="40"></TD>
  </TR>
  <TR>
!   <TH ALIGN="LEFT" VALIGN="TOP"><EM><STRONG>File</STRONG></EM></TD>
    <TD ALIGN="LEFT" VALIGN="TOP">
       <INPUT TYPE="file" NAME="file:string" SIZE="25" VALUE="">
    </TD>
  </TR>
  <TR><TH></TH>
      <TD>
         <INPUT TYPE="SUBMIT" VALUE=" Add ">
--- 38,69 ----
    <TD ALIGN="LEFT" VALIGN="TOP"><INPUT TYPE="TEXT" NAME="title" SIZE="40"></TD>
  </TR>
  <TR>
!   <TH ALIGN="LEFT" VALIGN="TOP"><EM><STRONG>Local File</STRONG></EM></TD>
    <TD ALIGN="LEFT" VALIGN="TOP">
       <INPUT TYPE="file" NAME="file:string" SIZE="25" VALUE="">
    </TD>
  </TR>
+ 
+ <!-- added by kslee -->
+ <dtml-if StDTMLRepo>
+ <dtml-unless NoStDTMLTemp>
+ <TR>
+   <TH ALIGN="LEFT" VALIGN="TOP"><EM><STRONG>Available<br>Templates</STRONG></EM></TD>
+   <TD ALIGN="LEFT" VALIGN="TOP">
+     <SELECT NAME="StDTMLTemp">
+       <OPTION value="" DISABLED>Default DTML Document</OPTION>
+        <dtml-with StDTMLRepo>
+        <dtml-in "objectValues('DTML Document')">
+        <OPTION value="&dtml-id;">&dtml-title;</OPTION>
+        </dtml-in>
+        </dtml-with>
+     </SELECT>
+   </TD>
+ </TR>
+ </dtml-unless>
+ </dtml-if StDTMLRepo>
+ <!-- ends -->
+ 
  <TR><TH></TH>
      <TD>
         <INPUT TYPE="SUBMIT" VALUE=" Add ">
*** methodAdd.dtml.original	Thu Jan 13 00:51:34 2000
--- methodAdd.dtml	Thu Jan 13 00:51:34 2000
***************
*** 21,26 ****
--- 21,30 ----
   You may create a new DTML Method object using the form below. 
   You may also choose to upload an existing html file from your
   local computer by clicking the <I>Browse</I> button.
+ <!-- added by kslee -->
+  Or select from your site's DTML Method Templates, if the
+  appropriate Selection Box appears below.
+ <!-- ends -->
  </P>
  
  <FORM ACTION="addDTMLMethod" METHOD="POST"
***************
*** 35,45 ****
    <TD ALIGN="LEFT" VALIGN="TOP"><INPUT TYPE="TEXT" NAME="title" SIZE="40"></TD>
  </TR>
  <TR>
!   <TH ALIGN="LEFT" VALIGN="TOP"><EM><STRONG>File</STRONG></EM></TD>
    <TD ALIGN="LEFT" VALIGN="TOP">
       <INPUT TYPE="file" NAME="file:string" SIZE="25" VALUE="">
    </TD>
  </TR>
  <TR><TH></TH>
      <TD>
         <INPUT TYPE="SUBMIT" VALUE=" Add ">
--- 39,69 ----
    <TD ALIGN="LEFT" VALIGN="TOP"><INPUT TYPE="TEXT" NAME="title" SIZE="40"></TD>
  </TR>
  <TR>
!   <TH ALIGN="LEFT" VALIGN="TOP"><EM><STRONG> Local File</STRONG></EM></TD>
    <TD ALIGN="LEFT" VALIGN="TOP">
       <INPUT TYPE="file" NAME="file:string" SIZE="25" VALUE="">
    </TD>
  </TR>
+ <!-- added by kslee -->
+ <dtml-if StDTMLRepo>
+ <dtml-unless NoStDTMLTemp>
+ <TR>
+   <TH ALIGN="LEFT" VALIGN="TOP"><EM><STRONG>Available<br>Templates</STRONG></EM></TD>
+   <TD ALIGN="LEFT" VALIGN="TOP">
+     <SELECT NAME="StDTMLTemp">
+       <OPTION value="" DISABLED>Default DTML Method</OPTION>
+        <dtml-with StDTMLRepo>
+        <dtml-in "objectValues('DTML Method')">
+        <OPTION value="&dtml-id;">&dtml-title;</OPTION>
+        </dtml-in>
+        </dtml-with>
+     </SELECT>
+   </TD>
+ </TR>
+ </dtml-unless>
+ </dtml-if StDTMLRepo>
+ <!-- ends -->
+ 
  <TR><TH></TH>
      <TD>
         <INPUT TYPE="SUBMIT" VALUE=" Add ">