Mercurial > hg > xemacs-beta

comparison src/keymap.c @ 22:8fc7fe29b841 r19-15b94

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b94
author cvs
date Mon, 13 Aug 2007 08:50:29 +0200
parents 859a2309aef8
children 4103f0995bd7
comparison
equal deleted inserted replaced
21:b88636d63495 22:8fc7fe29b841
226 Lisp_Object Qbutton0, Qbutton1, Qbutton2, Qbutton3, Qbutton4, Qbutton5, 226 Lisp_Object Qbutton0, Qbutton1, Qbutton2, Qbutton3, Qbutton4, Qbutton5,
227 Qbutton6, Qbutton7; 227 Qbutton6, Qbutton7;
228 Lisp_Object Qbutton0up, Qbutton1up, Qbutton2up, Qbutton3up, Qbutton4up, 228 Lisp_Object Qbutton0up, Qbutton1up, Qbutton2up, Qbutton3up, Qbutton4up,
229 Qbutton5up, Qbutton6up, Qbutton7up; 229 Qbutton5up, Qbutton6up, Qbutton7up;
230 Lisp_Object Qmenu_selection; 230 Lisp_Object Qmenu_selection;
231 /* Emacs compatibility */
232 Lisp_Object Qdown_mouse_1, Qdown_mouse_2, Qdown_mouse_3;
233 Lisp_Object Qmouse_1, Qmouse_2, Qmouse_3;
231 234
232 /* Kludge kludge kludge */ 235 /* Kludge kludge kludge */
233 Lisp_Object QLFD, QTAB, QRET, QESC, QDEL, QSPC, QBS; 236 Lisp_Object QLFD, QTAB, QRET, QESC, QDEL, QSPC, QBS;
234 237
235 238
1280 temp[2] = '-'; 1283 temp[2] = '-';
1281 *keysym = Fintern_soft(make_string((Bufbyte *)temp, 1284 *keysym = Fintern_soft(make_string((Bufbyte *)temp,
1282 strlen(temp)), 1285 strlen(temp)),
1283 Qnil); 1286 Qnil);
1284 } 1287 }
1288 /* Emacs compatibility */
1289 else if (EQ(*keysym, Qdown_mouse_1))
1290 *keysym = Qbutton1;
1291 else if (EQ(*keysym, Qdown_mouse_2))
1292 *keysym = Qbutton2;
1293 else if (EQ(*keysym, Qdown_mouse_3))
1294 *keysym = Qbutton3;
1295 else if (EQ(*keysym, Qmouse_1))
1296 *keysym = Qbutton1up;
1297 else if (EQ(*keysym, Qmouse_2))
1298 *keysym = Qbutton2up;
1299 else if (EQ(*keysym, Qmouse_3))
1300 *keysym = Qbutton3up;
1285 } 1301 }
1286 } 1302 }
1287 1303
1288 /* Given any kind of key-specifier, return a keysym and modifier mask. 1304 /* Given any kind of key-specifier, return a keysym and modifier mask.
1289 */ 1305 */
4178 defsymbol (&Qbutton3up, "button3up"); 4194 defsymbol (&Qbutton3up, "button3up");
4179 defsymbol (&Qbutton4up, "button4up"); 4195 defsymbol (&Qbutton4up, "button4up");
4180 defsymbol (&Qbutton5up, "button5up"); 4196 defsymbol (&Qbutton5up, "button5up");
4181 defsymbol (&Qbutton6up, "button6up"); 4197 defsymbol (&Qbutton6up, "button6up");
4182 defsymbol (&Qbutton7up, "button7up"); 4198 defsymbol (&Qbutton7up, "button7up");
4199 defsymbol (&Qmouse_1, "mouse-1");
4200 defsymbol (&Qmouse_2, "mouse-2");
4201 defsymbol (&Qmouse_3, "mouse-3");
4202 defsymbol (&Qdown_mouse_1, "down-mouse-1");
4203 defsymbol (&Qdown_mouse_2, "down-mouse-2");
4204 defsymbol (&Qdown_mouse_3, "down-mouse-3");
4183 defsymbol (&Qmenu_selection, "menu-selection"); 4205 defsymbol (&Qmenu_selection, "menu-selection");
4184 defsymbol (&QLFD, "LFD"); 4206 defsymbol (&QLFD, "LFD");
4185 defsymbol (&QTAB, "TAB"); 4207 defsymbol (&QTAB, "TAB");
4186 defsymbol (&QRET, "RET"); 4208 defsymbol (&QRET, "RET");
4187 defsymbol (&QESC, "ESC"); 4209 defsymbol (&QESC, "ESC");