emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 39854cd 82/92: Fix variable declarations


From: Alexey Veretennikov
Subject: [elpa] master 39854cd 82/92: Fix variable declarations
Date: Thu, 11 Jun 2015 19:48:20 +0000

branch: master
commit 39854cdadfb603a40786ba73c21085a3c085f22e
Author: Syohei YOSHIDA <address@hidden>
Commit: Syohei YOSHIDA <address@hidden>

    Fix variable declarations
---
 ztree-view.el |   14 +++++++-------
 1 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/ztree-view.el b/ztree-view.el
index 174afac..f4893e1 100644
--- a/ztree-view.el
+++ b/ztree-view.el
@@ -86,7 +86,7 @@ Used for 2-side trees, to determine if the node exists on 
left or right
 or both sides")
 (make-variable-buffer-local 'ztree-line-tree-properties)
 
-(defun ztree-tree-header-fun nil
+(defvar ztree-tree-header-fun nil
   "Function inserting the header into the tree buffer.
 MUST inster newline at the end!")
 (make-variable-buffer-local 'ztree-tree-header-fun)
@@ -96,30 +96,30 @@ MUST inster newline at the end!")
 the node")
 (make-variable-buffer-local 'ztree-node-short-name-fun)
 
-(defun ztree-node-is-expandable-fun nil
+(defvar ztree-node-is-expandable-fun nil
   "Function which determines if the node is expandable,
 for example if the node is a directory")
 (make-variable-buffer-local 'ztree-node-is-expandable-fun)
 
-(defun ztree-node-equal-fun nil
+(defvar ztree-node-equal-fun nil
   "Function which determines if the 2 nodes are equal")
 (make-variable-buffer-local 'ztree-node-equal-fun)
 
-(defun ztree-node-contents-fun nil
+(defvar ztree-node-contents-fun nil
   "Function returning list of node contents")
 (make-variable-buffer-local 'ztree-node-contents-fun)
 
-(defun ztree-node-side-fun nil
+(defvar ztree-node-side-fun nil
   "Function returning position of the node: 'left, 'right or 'both.
 If not defined(by default) - using single screen tree, otherwise
 the buffer is split to 2 trees")
 (make-variable-buffer-local 'ztree-node-side-fun)
 
-(defun ztree-node-face-fun nil
+(defvar ztree-node-face-fun nil
   "Function returning face for the node")
 (make-variable-buffer-local 'ztree-node-face-fun)
 
-(defun ztree-node-action-fun nil
+(defvar ztree-node-action-fun nil
   "Function called when Enter/Space pressed on the node")
 (make-variable-buffer-local 'ztree-node-action-fun)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]