view lisp/toolbar/fld_open.xpm @ 38014:8c5d188dc01b

(perl-font-lock-syntactic-keywords): New var, to recognize ${ $' and PODs. (perl-font-lock-syntactic-face-function): New function. (perl-mode): Use them. (perl-continuation-line-p): New function, from perl-calculate-indent. (perl-calculate-indent): Use it, to properly handle continuation lines of continuation lines.

/* XPM */
static char *magick[] = {
/* columns rows colors chars-per-pixel */
"24 24 4 1",
"  c Gray0",
". c #909090909090",
"X c #fefefefefefe",
"o c None",
/* pixels */
"oooooooooooooooooooooooo",
"oooooooooooooooooooooooo",
"oooooooooooooooooooooooo",
"oooooooooooooooooooooooo",
"oooooooooooooooooooooooo",
"oooooooooooooo  oooooooo",
"ooooooooooo   .. ooooooo",
"oooo  oo   ....XXo   ooo",
"ooo ..  ....XXXX  .. ooo",
"ooo .....XXXXX  .... ooo",
"oooo ..XXXXX  ...... ooo",
"oooo ..XXX  ........ ooo",
"ooooo .XX .......... ooo",
"ooooo ..X .......... ooo",
"oooooo .X .......... ooo",
"oooooo .. ........  oooo",
"ooooooo . ......  oooooo",
"ooooooo . ..... oooooooo",
"oooooooo  ...  ooooooooo",
"oooooooo  .  ooooooooooo",
"ooooooooo  ooooooooooooo",
"oooooooooooooooooooooooo",
"oooooooooooooooooooooooo",
"oooooooooooooooooooooooo"
};