/[meta-cvs]/meta-cvs/F-255EFD9E99EDDE6614CF2CD912CA4E5C
ViewVC logotype

Diff of /meta-cvs/F-255EFD9E99EDDE6614CF2CD912CA4E5C

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.26.2.2 by kaz, Mon Nov 4 02:07:35 2002 UTC revision 1.26.2.3 by kaz, Sun Apr 13 06:22:43 2003 UTC
# Line 91  Line 91 
91                                     #'string< :key #'mapping-entry-id))                                     #'string< :key #'mapping-entry-id))
92          (when (equal-filemaps edited-filemap filemap)          (when (equal-filemaps edited-filemap filemap)
93            (error "useless move of an object onto itself"))            (error "useless move of an object onto itself"))
94    
95            ;; In case a move clobbers some object that has local edits,
96            ;; we need to synchronize it to the MCVS directory.
97          (chatter-debug "Synchronizing.~%")          (chatter-debug "Synchronizing.~%")
98          (mapping-synchronize)          (mapping-synchronize :direction :left)
99    
100          (unwind-protect          (unwind-protect
101            (progn            (progn
102              (mapping-write edited-filemap *mcvs-map* :sort-map nil)              (mapping-write edited-filemap *mcvs-map* :sort-map nil)

Legend:
Removed from v.1.26.2.2  
changed lines
  Added in v.1.26.2.3

  ViewVC Help
Powered by ViewVC 1.1.5