Commit 38f584e9 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

(set-buffer-menubar): Remove unused

function.
(add-submenu): Only define for XEmacs.
(verilog-regexp-words): Revert previous change, keep the other
definition.
parent 6ca0ff73
2007-12-11 Dan Nicolaescu <dann@ics.uci.edu>
* progmodes/verilog-mode.el (set-buffer-menubar): Remove unused
function.
(add-submenu): Only define for XEmacs.
(verilog-regexp-words): Revert previous change, keep the other
definition.
2007-12-09 Dan Nicolaescu <dann@ics.uci.edu>
 
* progmodes/perl-mode.el (perl-continued-statement-offset)
......@@ -154,14 +154,14 @@
nil ;; fab
(defmacro store-match-data (&rest args) nil))
(error nil))
(condition-case nil
(if (boundp 'current-menubar)
nil ;; great
(progn
(defmacro set-buffer-menubar (&rest args) nil)
(defmacro add-submenu (&rest args) nil))
)
(error nil))
(if (featurep 'xemacs)
(condition-case nil
(if (boundp 'current-menubar)
nil ;; great
(progn
(defmacro add-submenu (&rest args) nil))
)
(error nil)))
(condition-case nil
(if (fboundp 'zmacs-activate-region)
nil ;; great
......@@ -274,9 +274,10 @@ STRING should be given if the last search was by `string-match' on STRING."
(concat open (mapconcat 'regexp-quote strings "\\|") close)))
))
(defun verilog-regexp-words (a)
"Call 'regexp-opt' with word delimiters for the words A."
(concat "\\<" (verilog-regexp-opt a t) "\\>"))
(eval-when-compile
(defun verilog-regexp-words (a)
"Call 'regexp-opt' with word delimiters for the words A."
(concat "\\<" (verilog-regexp-opt a t) "\\>")))
(defun verilog-customize ()
"Link to customize screen for Verilog."
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment