ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/main.C
(Generate patch)

Comparing rxvt-unicode/src/main.C (file contents):
Revision 1.154 by root, Sat Dec 31 17:16:17 2005 UTC vs.
Revision 1.155 by root, Mon Jan 2 15:35:43 2006 UTC

… …
30 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 30 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
31 *---------------------------------------------------------------------*/ 31 *---------------------------------------------------------------------*/
32 32
33#include "../config.h" /* NECESSARY */ 33#include "../config.h" /* NECESSARY */
34#include "rxvt.h" /* NECESSARY */ 34#include "rxvt.h" /* NECESSARY */
35#include "keyboard.h"
36#include "rxvtperl.h"
35 37
36#include <limits> 38#include <limits>
37 39
38#include <csignal> 40#include <csignal>
39#include <cstring> 41#include <cstring>
… …
42# include <grp.h> 44# include <grp.h>
43#endif 45#endif
44 46
45#ifdef HAVE_TERMIOS_H 47#ifdef HAVE_TERMIOS_H
46# include <termios.h> 48# include <termios.h>
47#endif
48
49#ifdef KEYSYM_RESOURCE
50# include "keyboard.h"
51#endif 49#endif
52 50
53vector<rxvt_term *> rxvt_term::termlist; 51vector<rxvt_term *> rxvt_term::termlist;
54 52
55static char curlocale[128]; 53static char curlocale[128];
… …
195 pty.put (); 193 pty.put ();
196} 194}
197 195
198rxvt_term::~rxvt_term () 196rxvt_term::~rxvt_term ()
199{ 197{
198 PERL_INVOKE ((this, HOOK_DESTROY, DT_END));
199
200 termlist.erase (find (termlist.begin (), termlist.end(), this)); 200 termlist.erase (find (termlist.begin (), termlist.end(), this));
201 201
202 emergency_cleanup (); 202 emergency_cleanup ();
203 203
204#if ENABLE_STYLES 204#if ENABLE_STYLES
… …
473#ifdef HAVE_SCROLLBARS 473#ifdef HAVE_SCROLLBARS
474 if (OPTION (Opt_scrollBar)) 474 if (OPTION (Opt_scrollBar))
475 scrollBar.setIdle (); /* set existence for size calculations */ 475 scrollBar.setIdle (); /* set existence for size calculations */
476#endif 476#endif
477 477
478#if ENABLE_PERL
479 rxvt_perl.init ();
480#endif
481
482 PERL_INVOKE ((this, HOOK_INIT, DT_END));
483
478 create_windows (argc, argv); 484 create_windows (argc, argv);
479 485
480 dDisp; 486 dDisp;
481 487
482 init_xlocale (); 488 init_xlocale ();
… …
514 free (cmd_argv); 520 free (cmd_argv);
515 521
516 pty_ev.start (pty.pty, EVENT_READ); 522 pty_ev.start (pty.pty, EVENT_READ);
517 523
518 check_ev.start (); 524 check_ev.start ();
525
526 PERL_INVOKE ((this, HOOK_START, DT_END));
519 527
520 return true; 528 return true;
521} 529}
522 530
523static struct sig_handlers 531static struct sig_handlers

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines