Mercurial > hg > xemacs-beta

comparison src/keymap.c @ 98:0d2f883870bc r20-1b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b1
author cvs
date Mon, 13 Aug 2007 09:13:56 +0200
parents c0c698873ce1
children 4be1180a9e89
comparison
equal deleted inserted replaced
97:498bf5da1c90 98:0d2f883870bc
225 Lisp_Object Qbutton0, Qbutton1, Qbutton2, Qbutton3, Qbutton4, Qbutton5, 225 Lisp_Object Qbutton0, Qbutton1, Qbutton2, Qbutton3, Qbutton4, Qbutton5,
226 Qbutton6, Qbutton7; 226 Qbutton6, Qbutton7;
227 Lisp_Object Qbutton0up, Qbutton1up, Qbutton2up, Qbutton3up, Qbutton4up, 227 Lisp_Object Qbutton0up, Qbutton1up, Qbutton2up, Qbutton3up, Qbutton4up,
228 Qbutton5up, Qbutton6up, Qbutton7up; 228 Qbutton5up, Qbutton6up, Qbutton7up;
229 Lisp_Object Qmenu_selection; 229 Lisp_Object Qmenu_selection;
230 /* Emacs compatibility */
231 Lisp_Object Qdown_mouse_1, Qdown_mouse_2, Qdown_mouse_3;
232 Lisp_Object Qmouse_1, Qmouse_2, Qmouse_3;
230 233
231 /* Kludge kludge kludge */ 234 /* Kludge kludge kludge */
232 Lisp_Object QLFD, QTAB, QRET, QESC, QDEL, QSPC, QBS; 235 Lisp_Object QLFD, QTAB, QRET, QESC, QDEL, QSPC, QBS;
233 236
234 237
1340 *keysym = QKescape; 1343 *keysym = QKescape;
1341 else if (EQ (*keysym, QDEL)) 1344 else if (EQ (*keysym, QDEL))
1342 *keysym = QKdelete; 1345 *keysym = QKdelete;
1343 else if (EQ (*keysym, QBS)) 1346 else if (EQ (*keysym, QBS))
1344 *keysym = QKbackspace; 1347 *keysym = QKbackspace;
1348 /* Emacs compatibility */
1349 else if (EQ(*keysym, Qdown_mouse_1))
1350 *keysym = Qbutton1;
1351 else if (EQ(*keysym, Qdown_mouse_2))
1352 *keysym = Qbutton2;
1353 else if (EQ(*keysym, Qdown_mouse_3))
1354 *keysym = Qbutton3;
1355 else if (EQ(*keysym, Qmouse_1))
1356 *keysym = Qbutton1up;
1357 else if (EQ(*keysym, Qmouse_2))
1358 *keysym = Qbutton2up;
1359 else if (EQ(*keysym, Qmouse_3))
1360 *keysym = Qbutton3up;
1345 } 1361 }
1346 } 1362 }
1347 1363
1348 1364
1349 /* Given any kind of key-specifier, return a keysym and modifier mask. 1365 /* Given any kind of key-specifier, return a keysym and modifier mask.
4196 defsymbol (&Qbutton3up, "button3up"); 4212 defsymbol (&Qbutton3up, "button3up");
4197 defsymbol (&Qbutton4up, "button4up"); 4213 defsymbol (&Qbutton4up, "button4up");
4198 defsymbol (&Qbutton5up, "button5up"); 4214 defsymbol (&Qbutton5up, "button5up");
4199 defsymbol (&Qbutton6up, "button6up"); 4215 defsymbol (&Qbutton6up, "button6up");
4200 defsymbol (&Qbutton7up, "button7up"); 4216 defsymbol (&Qbutton7up, "button7up");
4217 defsymbol (&Qmouse_1, "mouse-1");
4218 defsymbol (&Qmouse_2, "mouse-2");
4219 defsymbol (&Qmouse_3, "mouse-3");
4220 defsymbol (&Qdown_mouse_1, "down-mouse-1");
4221 defsymbol (&Qdown_mouse_2, "down-mouse-2");
4222 defsymbol (&Qdown_mouse_3, "down-mouse-3");
4201 defsymbol (&Qmenu_selection, "menu-selection"); 4223 defsymbol (&Qmenu_selection, "menu-selection");
4202 defsymbol (&QLFD, "LFD"); 4224 defsymbol (&QLFD, "LFD");
4203 defsymbol (&QTAB, "TAB"); 4225 defsymbol (&QTAB, "TAB");
4204 defsymbol (&QRET, "RET"); 4226 defsymbol (&QRET, "RET");
4205 defsymbol (&QESC, "ESC"); 4227 defsymbol (&QESC, "ESC");