/[webpac2]/trunk/web/browse.cgi
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/web/browse.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 58 by dpavlin, Tue Nov 15 14:30:26 2005 UTC revision 63 by dpavlin, Tue Nov 15 16:56:40 2005 UTC
# Line 74  if ($q->path_info =~ m#xml#) { Line 74  if ($q->path_info =~ m#xml#) {
74  <action type='javascript' errorCode='' errorMessage='' >  <action type='javascript' errorCode='' errorMessage='' >
75  <!--  <!--
76          var el = iwfGetById('div_record_nr');          var el = iwfGetById('div_record_nr');
77          if (el) el.innerHTML = '<strike>$rec</strike>';          if (el) el.innerHTML = '<strike>&nbsp;$rec&nbsp;</strike>';
78  //-->  //-->
79  </action>  </action>
80  </response>  </response>
# Line 94  if ($q->path_info =~ m#xml#) { Line 94  if ($q->path_info =~ m#xml#) {
94                                  return $iconv_loc->convert(chr(hex($t)));                                  return $iconv_loc->convert(chr(hex($t)));
95                          }                          }
96                          $tmpl =~ s/%u([a-fA-F0-9]{4})/_conv_js($1)/gex;                          $tmpl =~ s/%u([a-fA-F0-9]{4})/_conv_js($1)/gex;
97                            $tmpl =~ s/[\n\r]+$//s;
98    
99                          my $tmpl_file = $out->{'include_path'} . '/' . $template;                          my $tmpl_file = $out->{'include_path'} . '/' . $template;
100                          write_file($tmpl_file . '.new', $tmpl) || die "can't save $tmpl_file: $!";                          write_file($tmpl_file . '.new', $tmpl) || die "can't save $tmpl_file: $!";
# Line 101  if ($q->path_info =~ m#xml#) { Line 102  if ($q->path_info =~ m#xml#) {
102    
103                          print qq{<response>                          print qq{<response>
104  <action type='html' target='div_status' errorCode='' errorMessage='' >  <action type='html' target='div_status' errorCode='' errorMessage='' >
105  $template saved  <tt>$template</tt> saved
106  </action>  </action>
107  <action type='js'>  <action type='js'>
108  <!--  <!--
109    iwfShow('div_status', 1);
110  reload_rec();  reload_rec();
111    iwfHideGentlyDelay('div_status', 2, 2000, 1);
112  -->  -->
113  </action>  </action>
114  </response>  </response>
# Line 121  reload_rec(); Line 124  reload_rec();
124  <action type='html' target='div_template' errorCode='' errorMessage='' >  <action type='html' target='div_template' errorCode='' errorMessage='' >
125  <pre>}, Dumper($q->Vars), qq{</pre>  <pre>}, Dumper($q->Vars), qq{</pre>
126    
127  <form name="frmEditor" action="$self" method="post"  <form name="frmEditor" action="$self" method="post" iwfTarget="div_status" >
 iwfTarget="div_status"  
 >  
128    
129  <textarea name="tt_template" cols="80" rows="10" style="display: block;">  <textarea name="tt_template" cols="80" rows="10" style="display: block;">
130  $tmpl  $tmpl
# Line 131  $tmpl Line 132  $tmpl
132    
133  <br/>  <br/>
134  <input type="button" name="save_template" value="Save" onclick="javascript:iwfRequest(this);" />  <input type="button" name="save_template" value="Save" onclick="javascript:iwfRequest(this);" />
135  <input type="checkbox" name="checkin_template" id="checkin_checkbox" label="checkin" />  <!--
136  <span id="div_status" style="color: #808080;">idle</span>  <input type="checkbox" name="checkin_template" id="checkin_checkbox" label="checkin" /> checkin
137    -->
138    &nbsp;&nbsp;<span id="div_status" style="color: #808080;">idle</span>
139    
140  <input type='hidden' value='hidden post value' name='hidValue' />  <input type='hidden' value='hidden post value' name='hidValue' />
141    
142  </form>  </form>
143  </action>  </action>
144    <action type='js'>
145    <!--
146    iwfHideGentlyDelay('div_status', 2, 2000, 1);
147    -->
148    </action>
149  </response>  </response>
150                  };                  };
151    
# Line 163  function update_status(text) { Line 171  function update_status(text) {
171  }  }
172    
173  function load_rec(nr) {  function load_rec(nr) {
174            if (nr == 1) {
175                    iwfHide('a_left_arr', 1);
176            } else {
177                    iwfShow('a_left_arr', 1);
178            }
179          update_status(nr+'...');          update_status(nr+'...');
180          iwfRequest( url+'/xml/?rec='+nr, 'div_record' );          iwfRequest( url+'/xml/?rec='+nr, 'div_record' );
181          iwfOpacity('div_record', 30);          iwfOpacity('div_record', 30);
# Line 175  function inc_rec() { Line 188  function inc_rec() {
188  }  }
189    
190  function dec_rec() {  function dec_rec() {
191          rec--;          if (rec > 1) {
192          load_rec(rec);                  rec--;
193                    load_rec(rec);
194            }
195          return false;          return false;
196  }  }
197    
# Line 202  template = <tt>$template</tt><br/> Line 217  template = <tt>$template</tt><br/>
217  </div>  </div>
218    
219  <div style="background: #e0e0e0; padding: 0.5em; display: block;">  <div style="background: #e0e0e0; padding: 0.5em; display: block;">
220          <a href="$self?rec=}, $rec - 1, qq{" onClick="return dec_rec();">&#8678;</a>&nbsp;          <a id="a_left_arr" href="$self?rec=}, $rec - 1, qq{" onClick="return dec_rec();">&#8678;</a>
221          <span id="div_record_nr"> none </span>          <span id="div_record_nr"> none </span>
222    
223          <a href="$self?rec=}, $rec + 1, qq{" onClick="return inc_rec();">&#8680;</a>&nbsp;          <a id="a_right_arr" href="$self?rec=}, $rec + 1, qq{" onClick="return inc_rec();">&#8680;</a>
224          <a href="$self?rec=}, $rec, qq{" onClick="return reload_rec();">&#8634;</a>&nbsp;          <a id="a_reload" href="$self?rec=}, $rec, qq{" onClick="return reload_rec();">&#8634;</a>
225          <a href="#" onClick="iwfRefreshLog(); return false;">&#9636;</a>&nbsp;          <a href="#" onClick="iwfRefreshLog(); return false;">&#9636;</a>
226    
227  </div>  </div>
228    
Legend:
Removed from v.58  
changed lines
  Added in v.63
  ViewVC Help
Powered by ViewVC 1.1.26