Permalink
Browse files

[contrib] merge: pull request #3 from git://github.com/arthuraa/opalang

  • Loading branch information...
2 parents 32fa369 + 1b1708b commit 3854ea810bcfae7b7148bc3d9e27249aecb03a7b François-Régis Sinot committed Aug 23, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 utils/emacs/opa-mode.el
View
@@ -398,8 +398,8 @@
(defun buffer-substring1 (pos)
(buffer-substring pos (1+ pos)))
-(defun is-in-xhtml-zone (p)
- (eq (get-text-property p 'syntax-table) opa-mode-syntax-table-xhtml))
+(defun is-in-xhtml-zone ()
+ (eq (get-text-property (point) 'syntax-table) opa-mode-syntax-table-xhtml))
(defun is-in-ppdebug-zone ()
(eq (get-text-property (point) 'face) 'opa-font-ppdebug-face))

0 comments on commit 3854ea8

Please sign in to comment.